procedure TCustomChromiumFMX.Resize;
var
brws: ICefBrowser;
b: TBitmap;
begin
inherited;
if not (csDesigning in ComponentState) then
begin
brws := FBrowser;
if (brws <> nil) then
begin
if FBuffer = nil then
FBuffer := TBitmap.Create(Trunc(Width), Trunc(Height)) else
begin
b := TBitmap.Create;
b.Assign(FBuffer);
FBuffer.SetSize(Trunc(Width), Trunc(Height));
FBuffer.Canvas.BeginScene;
FBuffer.Canvas.DrawBitmap(B, RectF(0, 0, b.Width, b.Height), RectF(0, 0, b.Width, b.Height), 1, True);
FBuffer.Canvas.EndScene;
b.Free;
end;
brws.Host.WasResized;
end;
end;
end;