Einzelnen Beitrag anzeigen

davar

Registriert seit: 4. Feb 2005
311 Beiträge
 
Turbo Delphi für Win32
 
#1

Formularpositionen übergeben

  Alt 20. Jan 2006, 13:51
Hallo Leute,

entweder ich kann nicht richtig suchen, oder es hatte bisher tatsächlich niemand dieses Problem.. Was ich mir eigentlich schwer vorstellen kann..

ich habe eine Applikation mit mehreren Formularen erstellt. Wenn ein anderes Formular nun angezeigt wird, soll die Formularposition beibehalten werden, d.h. wenn Form1 maximiert ist, soll Form2 auch maximiert sein, ansonsten soll die Position übernommen werden.

Also:
Delphi-Quellcode:
if Form1.WindowState = wsmaximized then
   Form2.WindowState:= wsmaximized
   else
   begin
        Form2.left:= Form1.left;
        Form2.top:= Form1.top;
   end;
Form2.ShowModal;
Es würde aber wohl wenig Sinn machen, dies bei jedem Aufruf hinzuschreiben. Alternativ habe ich mir überlegt, dies in eine global erreichbare Funktion zu packen und jedesmal aufzurufen, oder aber mittels einer ini-Datei die Position zu schreiben/lesen.

Gibt es denn eine sinnvollere und einfachere Methode, mir diese Arbeit irgendwie abnehmen zu lassen?

MfG

davar
  Mit Zitat antworten Zitat