mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-14 23:39:08 +02:00
IDE, debug registers: Windows, reduce flicker
git-svn-id: trunk@62593 -
This commit is contained in:
parent
84ac7fd966
commit
12f9283b78
@ -467,12 +467,16 @@ end;
|
|||||||
|
|
||||||
procedure TRegistersDlg.DoBeginUpdate;
|
procedure TRegistersDlg.DoBeginUpdate;
|
||||||
begin
|
begin
|
||||||
|
{$IFnDEF WINDOWS}
|
||||||
lvRegisters.BeginUpdate;
|
lvRegisters.BeginUpdate;
|
||||||
|
{$ENDIF}
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TRegistersDlg.DoEndUpdate;
|
procedure TRegistersDlg.DoEndUpdate;
|
||||||
begin
|
begin
|
||||||
|
{$IFnDEF WINDOWS}
|
||||||
lvRegisters.EndUpdate;
|
lvRegisters.EndUpdate;
|
||||||
|
{$ENDIF}
|
||||||
if FNeedUpdateAgain then RegistersChanged(nil);
|
if FNeedUpdateAgain then RegistersChanged(nil);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user