Center Form i MainForm

Du vælger den form der skal åbnes og så går du ud i Object Inspetor og vælger \"poMainFormCenter\" under position.

Men med OpenDlg ved jeg ikke rigtigt måske noget med at skrive \"Position:=poMainFormCenter;\" et eller andet sted... ved det ikke!!!

Andreas

weis -> Det har jeg skam prøvet mange gange!

Men hver gang man flytter på \"MainForm\" kommer under formen bare det sted som \"MainForm\" var før!

Kan man ikke få den til at være i midten af \"MainForm\" lige meget hvor meget man flytter den?

ja og det samme med en OpenDlg!

>>lolle

Jeg har fundet koden for centre en ny form, du skal kode knappen eller hvad du nu end bruger sådan her:

procedure TForm1.Button1Click(Sender: TObject);
begin
Form2.Show;
Form2.Position:=poMainFormCenter;
end;

/Andreas

UnderForm.Left := MainForm.Left + ((MainForm.Width - UnderForm.Width) div 2);
UnderForm.Top := MainForm.Top + ((MainForm.Height - UnderForm.Height) div 2);
UnderForm.Show;