pascal/CEF4Delphi
1
0
Fork 0
mirror of https://github.com/salvadordf/CEF4Delphi.git synced 2025-08-14 21:42:50 +02:00
Code Issues Actions 1 Releases Activity

Added TCEFWinControl.InvalidateChildren

Browse Source
This commit is contained in:
Salvador Díaz Fau
2018-10-20 20:43:06 +02:00
parent 67c45875d9
commit 74c545a5fb
1 changed files with 6 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
source/uCEFWinControl.pas
View File

@@ -71,6 +71,7 @@ type
function TakeSnapshot(var aBitmap : TBitmap) : boolean; function TakeSnapshot(var aBitmap : TBitmap) : boolean;
function DestroyChildWindow : boolean; function DestroyChildWindow : boolean;
procedure CreateHandle; override; procedure CreateHandle; override;
procedure InvalidateChildren;
procedure UpdateSize; procedure UpdateSize;
property ChildWindowHandle : THandle read GetChildWindowHandle; property ChildWindowHandle : THandle read GetChildWindowHandle;
@@ -111,6 +112,11 @@ begin
inherited CreateHandle; inherited CreateHandle;
end; end;
procedure TCEFWinControl.InvalidateChildren;
begin
if HandleAllocated then RedrawWindow(Handle, nil, 0, RDW_INVALIDATE or RDW_ALLCHILDREN);
end;
procedure TCEFWinControl.UpdateSize; procedure TCEFWinControl.UpdateSize;
var var
TempRect : TRect; TempRect : TRect;