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 Forms einer Applikation in einem Menu anzeigen (https://www.delphipraxis.net/126226-forms-einer-applikation-einem-menu-anzeigen.html)

HRNICKEL 20. Dez 2008 11:27


Forms einer Applikation in einem Menu anzeigen
 
Hallo,

ich erzeuge dynamisch Form's und möchte im Start-Fenster alle bereits geöffneten Fenster auflisten und dann in den Vordergrund legen können.
(nur Fenster der eigenen Applikation)

Kann mir da jemand helfen ?

Danke im Vorraus.....

mkinzler 20. Dez 2008 11:30

Re: Forms einer Applikation in einem Menu anzeigen
 
Du musst halt dementsprechend auch dynamisch Menüeinträge erstellen.

HRNICKEL 20. Dez 2008 13:20

Re: Forms einer Applikation in einem Menu anzeigen
 
Ich erstelle die Forms mit dem IDE Scripter von TMS.

Das Handle oder das Objekt ist mit nicht bekannt.

Totaler 20. Dez 2008 14:16

Re: Forms einer Applikation in einem Menu anzeigen
 
Hallo

ich erzeuge auch Forms dynamisch und zeige diese dann im MainForm an

Delphi-Quellcode:
  //Form1 ist das MAIN Form
  //Form_Dynamisch Dynmisch erzeugte Form

  Form_Dynamisch.Parent:= Form1;
  Form_Dynamisch.Align := alClient; //Oder bei mehreren Forms alnone und mit TOP etc einpassen
  Form_Dynamisch.Show;
  Form_Dynamisch.bringtofront;
Ich hoffe ich konnte Dir helfen

HRNICKEL 20. Dez 2008 14:26

Re: Forms einer Applikation in einem Menu anzeigen
 
Hallo,

Danke

leider nicht.

bei dem TMS IDE Scripter wird die Form innerhalb einer Komponente erzeugt und gestartet.

Ich muß deshalb ein Fenster-Handles nachträglich erzeugen, so ähnlich wie bei EnumWindowUtil.pas

halt bezogen auf die eigene Applikation.

Gruß
Roland

Totaler 20. Dez 2008 14:34

Re: Forms einer Applikation in einem Menu anzeigen
 
Hallo,

ich kenne den TMS Scripter zwar nicht
aber die mainform hast Du doch

Delphi-Quellcode:
     
if myObjeckt is tform then
         for I := 0  to TForm(myObjeckt).ComponentCount - 1 do
         begin
             TForm(myObjeckt).Components[i].Parent := TForm(myObjeckt);
             ....
         end;

ich weiß nicht ob Dir das weiterhilft

Gruß hans

sx2008 20. Dez 2008 14:57

Re: Forms einer Applikation in einem Menu anzeigen
 
Das globale Object Screen erlaubt das Auflisten aller Formulare:
Delphi-Quellcode:
for i:=0 to Screen.FormCount-1 do
begin
  tmpcaption := Screen.Forms[i].Caption;
  if Screen.Forms[i] = Application.MainForm then
      // nichts tun (Hauptformular soll nicht ins Menü)
  else
    ErzeugeDynamischenMenuEintrag(tmpcaption);
end;
Jetzt muss du nur noch herausfinden, wie man zur Laufzeit einen Menüpunkt erzeugt.

DeddyH 20. Dez 2008 15:20

Re: Forms einer Applikation in einem Menu anzeigen
 
Zitat:

Zitat von HRNICKEL
bei dem TMS IDE Scripter wird die Form innerhalb einer Komponente erzeugt und gestartet.

Ich kenne das Teil zwar auch nicht, aber schau doch einmal nach, wie man da gezielt auf ein bestimmtes Formular zugreift. Ich könnte mir vorstellen, dass die Formulare in einer Liste oder einem Array vorgehalten werden. Evtl. kommt man da ja ran.


Alle Zeitangaben in WEZ +1. Es ist jetzt 05:52 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