Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi Formular in Bildschrimmitte (https://www.delphipraxis.net/148045-formular-bildschrimmitte.html)

Shubit 21. Feb 2010 11:16


Formular in Bildschrimmitte
 
Hi,
wenn ich ein zusätzliches Formular erstelle, hät ich es gerne in der Bildschirmmitte. Daher habe ich meinem zusätzlich Formular folgende Procedure verpasst:
Delphi-Quellcode:
procedure TFm_Question.SetToScreenMiddle();
begin
  Left := (Screen.Monitors[0].Width - Width) div 2;
  Top := (Screen.Monitors[0].Height - Height) div 2;
end;
Wenn ich jetzt aber folgendes mache:
Delphi-Quellcode:
  NewForm := TFm_Question.CreateNew(self);
  NewForm.SetToScreenMiddle();
  NewForm.ShowModal;
erscheint das Formular nicht in der Bildschrimmitte. Scheinbar werden die in SetToScreenMiddle festgelegten Werte für Left und Top nochmal überschrieben. Bleibt ja eigentlich nur ShowModal. Lässt sich das verhindern?

mkinzler 21. Feb 2010 11:20

Re: Formular in Bildschrimmitte
 
Schau dir mal TForm.Position an

DP-Maintenance 21. Feb 2010 11:20

DP-Maintenance
 
Dieses Thema wurde von "mkinzler" von "Sonstige Fragen zu Delphi" nach "VCL / WinForms / Controls" verschoben.
Keine Frage der Sprache, sondern der Bibliothek

BUG 21. Feb 2010 11:21

Re: Formular in Bildschrimmitte
 
Evtl. hilft es vor Show(Modal) NewForm.Position auf poScreenCenter zu stellen?

Shubit 24. Feb 2010 19:12

Re: Formular in Bildschrimmitte
 
danke euch beiden, die Eigenschaft Position kannte ich nicht, aber die behebt natürlich das Problem :D


Alle Zeitangaben in WEZ +1. Es ist jetzt 23:09 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz