mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-09-18 14:59:15 +02:00
win32: remove WindowInfo^.needParentPaint set in CreateHandle of ListBox and CheckListBox - they are set during WM_NCCREATE
git-svn-id: trunk@30091 -
This commit is contained in:
parent
ed876e5df9
commit
e191075b61
@ -166,8 +166,6 @@ begin
|
||||
end;
|
||||
// create window
|
||||
FinishCreateWindow(AWinControl, Params, False, True);
|
||||
// listbox is not a transparent control -> no need for parentpainting
|
||||
Params.WindowInfo^.needParentPaint := False;
|
||||
Result := Params.Window;
|
||||
end;
|
||||
|
||||
|
@ -587,6 +587,7 @@ begin
|
||||
WindowInfo^.WinControl := NCCreateParams^.WinControl;
|
||||
WindowInfo^.WinControl.Handle := Window;
|
||||
WindowInfo^.DefWndProc := NCCreateParams^.DefWndProc;
|
||||
// listbox is not a transparent control -> no need for parentpainting
|
||||
WindowInfo^.needParentPaint := False;
|
||||
SetWindowLong(Window, GWL_ID, PtrInt(NCCreateParams^.WinControl));
|
||||
NCCreateParams^.Handled := True;
|
||||
@ -642,8 +643,6 @@ begin
|
||||
end;
|
||||
// create window
|
||||
FinishCreateWindow(AWinControl, Params, False, True);
|
||||
// listbox is not a transparent control -> no need for parentpainting
|
||||
Params.WindowInfo^.needParentPaint := False;
|
||||
Result := Params.Window;
|
||||
end;
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user