Benutzer-Werkzeuge

Webseiten-Werkzeuge


delphi:vcl:createparented

CreateParented

Zum Beispiel in einer DLL

function TFoo.Init(ParentWnd: hwnd; R: TRect; Param1 : Boolean): hWnd;
begin
  FFoo := TGoogleMapForm.CreateParented(ParentWnd);
  FFoo.Layout.Height := R.Height; // Layout ist ein Panel
  FFoo.Layout.Width  := R.Width;
  FFoo.Layout.Realign;
  FFoo.Init(Param1); // Der Parameter den wir eigentlich übergeben wollten...
  SetWindowPos(FFoo.Layout.Handle,0,R.Left,R.Top,R.Right-R.Left,R.Bottom-R.Top,0);
  Result := FFoo.Layout.Handle;
end;
delphi/vcl/createparented.txt · Zuletzt geändert: 2015/03/14 21:46 von gerdbernau