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;