zweites form in der mitte vom ersten öffnen

**Fredyy**

hi,
ich habe in meinen prog 2 forms, doch ich möchte, dass sich das zweite form in der mitte von der aktuellen position des ersten form öffnet, ich habe das auch schon selber probiert jedoch nicht sehr erfolgreich.

markieren

Delphi-Quellcode:

			procedure TForm3.FormCreate(Sender: TObject);

begin

Form3.Top  := round(Form1.Top + (Form1.Height/2));

form3.Left := round(Form1.Left + (Form1.Width/2));

end;

danke für eure hilfe.
mfg
fredyy

**Christian Seehase**

Moin Fredyy,

probier's mal mit der Höhe und Breite von Form3

Schau dir mal die Eigenschaft Delphi-Referenz durchsuchen

Position der Form an - dort dann u.a. Delphi-Referenz durchsuchen

poOwnerFormCenter

**Matze**

Hi,

meinst du vielleicht

Form2.Position := poMainFormCenter; oder so ähnlich (im OI einstellbar)? Dann ist es zentriert vor dem Hauptformular.

Edit: Ich war wohl zu langsam.

**Fredyy**

danke für die turbo antworten

jetzt bleibt nur noch eine frage offen, da sich das form 3 im laufe des progs häufiger öffnen bzw schliessen lässt, kann ich den code ja nicht in OnCreate packen, da würde er ja nur einmal ausgeführt, er soll bei jedem öffnen ausgeführt werden wo muss ich ihn dann rein packen? bin leider noch kein delphi profi.

mfg
fredyy

**RavenIV**

Wie's der Name der Properties schon sagt:
OnCreate: Beim Erzwugen.
OnShow: Beim Anzeigen

**Fredyy**

Zitat von RavenIV:

Wie's der Name der Properties schon sagt:
OnCreate: Beim Erzwugen.
OnShow: Beim Anzeigen

wenn ich

markieren

Delphi-Quellcode:

			procedure TForm3.FormShow(Sender: TObject);

begin

Form3.Position := poMainFormCenter;

end;

mache bekomme ich ne fehlermeldung "Cannot change Visible in OnShow or OnHide", er kann also die position in onshow nicht ändern, ist also leider nicht möglich

**Matze**

Hi,

du könntest es bei jedem Aufruf neu setzen:

markieren

Delphi-Quellcode:

			Form2.Position := poMainFormCenter;

Form2.Show;

**DeddyH**

Dann mach es doch beim Aufruf von Show des Formulars (über Button or whatever):

markieren

Delphi-Quellcode:

			procedure TFormMain.ButtonShowForm3Click(Sender: TObject);

begin

  Form3.Position := poMainFormCenter;

  Form3.Show;

end;

Ungetestet, sollte aber IMHO funktionieren.

[edit]Matze war einen Tick schneller[/edit]

**Fredyy**

Zitat von Matze:

Hi,

du könntest es bei jedem Aufruf neu setzen:

markieren

Delphi-Quellcode:

			Form2.Position := poMainFormCenter;

Form2.Show;

ah, super da muss man erstmal drauf kommen, dass ganze aus der ersten unit zu steuern

danke, damit wäre meine frage geklärt.

mfg
fredyy

zweites form in der mitte vom ersten öffnen

zweites form in der mitte vom ersten öffnen

Re: zweites form in der mitte vom ersten öffnen

Re: zweites form in der mitte vom ersten öffnen

Re: zweites form in der mitte vom ersten öffnen

Re: zweites form in der mitte vom ersten öffnen

Re: zweites form in der mitte vom ersten öffnen

Re: zweites form in der mitte vom ersten öffnen

Re: zweites form in der mitte vom ersten öffnen

Re: zweites form in der mitte vom ersten öffnen

Re: zweites form in der mitte vom ersten öffnen

Forumregeln

Christian Seehase (Co-Admin) Registriert seit: 29. Mai 2002 Ort: Hamburg 11.107 Beiträge Delphi 11 Alexandria	#2 Re: zweites form in der mitte vom ersten öffnen 3. Okt 2007, 14:02 Moin Fredyy, probier's mal mit der Höhe und Breite von Form3 Tschüss Chris Die drei Feinde des Programmierers: Sonne, Frischluft und dieses unerträgliche Gebrüll der Vögel. Der Klügere gibt solange nach bis er der Dumme ist
	Zitat

Muetze1 (Gast) n/a Beiträge	#3 Re: zweites form in der mitte vom ersten öffnen 3. Okt 2007, 14:02 Schau dir mal die Eigenschaft Position der Form an - dort dann u.a. poOwnerFormCenter
	Zitat

Matze (Co-Admin) Registriert seit: 7. Jul 2003 Ort: Schwabenländle 14.929 Beiträge Turbo Delphi für Win32	#4 Re: zweites form in der mitte vom ersten öffnen 3. Okt 2007, 14:03 Hi, meinst du vielleicht Form2.Position := poMainFormCenter; oder so ähnlich (im OI einstellbar)? Dann ist es zentriert vor dem Hauptformular. Edit: Ich war wohl zu langsam.
	Zitat

RavenIV Registriert seit: 12. Jan 2005 Ort: Waldshut-Tiengen 2.875 Beiträge Delphi 2007 Enterprise	#6 Re: zweites form in der mitte vom ersten öffnen 3. Okt 2007, 14:22 Wie's der Name der Properties schon sagt: OnCreate: Beim Erzwugen. OnShow: Beim Anzeigen Klaus E. Linux - das längste Text-Adventure aller Zeiten... Wer nie Linux mit dem vi konfiguriert hat, der hat am Leben vorbei geklickt.
	Zitat

Matze (Co-Admin) Registriert seit: 7. Jul 2003 Ort: Schwabenländle 14.929 Beiträge Turbo Delphi für Win32	#8 Re: zweites form in der mitte vom ersten öffnen 3. Okt 2007, 14:31 Hi, du könntest es bei jedem Aufruf neu setzen: markieren Delphi-Quellcode: Form2.Position := poMainFormCenter; Form2.Show;
	Zitat

Fredyy Registriert seit: 31. Mär 2005 Ort: Wilhelmshaven 46 Beiträge Delphi 7 Personal	#10 Re: zweites form in der mitte vom ersten öffnen 3. Okt 2007, 14:33 Zitat von Matze: Hi, du könntest es bei jedem Aufruf neu setzen: markieren Delphi-Quellcode: Form2.Position := poMainFormCenter; Form2.Show; ah, super da muss man erstmal drauf kommen, dass ganze aus der ersten unit zu steuern danke, damit wäre meine frage geklärt. mfg fredyy Frederick B.
	Zitat