mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-28 21:00:43 +02:00
IDE, Debugger: Fixed crash in Asm dialog (dialog closed, while running (F9) from dlg)
git-svn-id: trunk@44764 -
This commit is contained in:
parent
469e1dd8c0
commit
fb748dcef7
@ -315,6 +315,7 @@ begin
|
|||||||
inherited;
|
inherited;
|
||||||
Exit;
|
Exit;
|
||||||
end;
|
end;
|
||||||
|
pbAsm.Invalidate;
|
||||||
case Key of
|
case Key of
|
||||||
VK_UP: begin
|
VK_UP: begin
|
||||||
ToolButtonPower.Down := True;
|
ToolButtonPower.Down := True;
|
||||||
@ -365,7 +366,6 @@ begin
|
|||||||
else
|
else
|
||||||
inherited;
|
inherited;
|
||||||
end;
|
end;
|
||||||
pbAsm.Invalidate;
|
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TAssemblerDlg.CopyToClipboardClick(Sender: TObject);
|
procedure TAssemblerDlg.CopyToClipboardClick(Sender: TObject);
|
||||||
|
Loading…
Reference in New Issue
Block a user