* Replace ZeroMemory by FillChar

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@4093 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
blikblum
2015-04-21 23:21:13 +00:00
parent cb3e968166
commit 3f6f45f65a

View File

@ -9314,7 +9314,7 @@ begin
OwnerDraw := (hoOwnerDraw in FHeader.FOptions) and Assigned(FHeader.Treeview.FOnHeaderDraw) and OwnerDraw := (hoOwnerDraw in FHeader.FOptions) and Assigned(FHeader.Treeview.FOnHeaderDraw) and
not (csDesigning in FHeader.Treeview.ComponentState) and not AdvancedOwnerDraw; not (csDesigning in FHeader.Treeview.ComponentState) and not AdvancedOwnerDraw;
ZeroMemory(@PaintInfo, SizeOf(PaintInfo)); FillChar(PaintInfo, SizeOf(PaintInfo), #0);
PaintInfo.TargetCanvas := TargetCanvas; PaintInfo.TargetCanvas := TargetCanvas;
with PaintInfo, TargetCanvas do with PaintInfo, TargetCanvas do