pascal/lazarus-ccr
1
0
Fork 0
Code Issues Releases Activity

* Use TCanvas.Save/RestoreHandle. Issue 21866

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@2430 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
blikblum
2012-05-12 17:06:48 +00:00
parent d41597f774
commit 793a4cb817
1 changed files with 2 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
components/virtualtreeview-new/branches/4.8/VirtualTrees.pas
View File

@@ -8522,7 +8522,6 @@ var
RequestedElements, RequestedElements,
ActualElements: THeaderPaintElements; ActualElements: THeaderPaintElements;
SavedDC: Integer;
Temp: TRect; Temp: TRect;
ColCaptionText: String; ColCaptionText: String;
ColImages: TCustomImageList; ColImages: TCustomImageList;
@@ -8852,9 +8851,9 @@ begin
if ActualElements <> [] then if ActualElements <> [] then
begin begin
SavedDC := SaveDC(Handle); SaveHandleState;
FHeader.Treeview.DoAdvancedHeaderDraw(PaintInfo, ActualElements); FHeader.Treeview.DoAdvancedHeaderDraw(PaintInfo, ActualElements);
RestoreDC(Handle, SavedDC); RestoreHandleState;
end; end;
end end
else // Let application draw the header. else // Let application draw the header.