paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-21 13:59:10 +02:00
Code Issues Packages Projects Releases Wiki Activity

IDE, debug registers: Windows, reduce flicker

Browse Source 
git-svn-id: trunk@62593 -
This commit is contained in:
martin 2020-01-26 20:15:02 +00:00
parent 84ac7fd966
commit 12f9283b78
1 changed files with 4 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
debugger/registersdlg.pp
View File

@ -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;