aksdb
/
CentrED
1
0
Fork 0
Code Issues 2 Pull Requests Releases Wiki Activity

- Fixed TfrmMain.OnStaticElevated to correctly handle off-screen updates

This commit is contained in:
Andreas Schneider 2009-12-05 00:57:55 +01:00
parent a5082879fe
commit 4da488a02b
1 changed files with 8 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
Client/UfrmMain.pas
View File

@ -2096,10 +2096,16 @@ begin
end; end;
procedure TfrmMain.OnStaticElevated(AStaticItem: TStaticItem); procedure TfrmMain.OnStaticElevated(AStaticItem: TStaticItem);
var
blockInfo: PBlockInfo;
begin begin
AStaticItem.PrioritySolver := FScreenBuffer.GetSerial; AStaticItem.PrioritySolver := FScreenBuffer.GetSerial;
PrepareScreenBlock(FScreenBuffer.UpdateSortOrder(AStaticItem)); blockInfo := FScreenBuffer.UpdateSortOrder(AStaticItem);
Exclude(FScreenBufferState, sbsIndexed); if blockInfo <> nil then
begin
PrepareScreenBlock(blockInfo);
Exclude(FScreenBufferState, sbsIndexed);
end;
end; end;
procedure TfrmMain.OnStaticHued(AStaticItem: TStaticItem); procedure TfrmMain.OnStaticHued(AStaticItem: TStaticItem);