Einzelnen Beitrag anzeigen

Heffalump

Registriert seit: 3. Aug 2005
278 Beiträge
 
RAD-Studio 2009 Ent
 
#5

Re: Formularpositionen übergeben

  Alt 23. Jan 2006, 12:38
Das wäre unter Umständen auch eine Möglichkeit:
Delphi-Quellcode:
procedure TForm2.FormShow(Sender: TObject);
var lvWindowPlacement: TWindowPlacement;
begin
  lvWindowPlacement.length := SizeOf(TWindowPlacement);
  if GetWindowPlacement(Application.MainFormHandle,@lvWindowPlacement) then
    begin
      SetWindowPlacement(Self.Handle,@lvWindowPlacement);
    end;
end;
  Mit Zitat antworten Zitat