Und warum sagst du das nicht gleich in deinem ersten Posting?
BTW:
Delphi-Quellcode:
procedure TForm2.FormShow(Sender: TObject);
begin
Left := Form1.Left - Width;
Top := (Form1.Top + (Form1.Height div 2)) - (Height div 2);
end;
Funktioniert so wohl bei 1200x1024 als auch bei 800x600 so wie gewünscht. Hätte mich auch gewundert, wenn das von der Auflösung abhängig gewesen wäre.