Taskbareintrag bei neuem Form aus Objekt

[kaiser1401]

Hallo,

mal wieder eine Taskbar-Frage da ich leider nichts passendes finde

Ich habe ein Objekt das über eine Methode ein Formular erstellt und dieses Modal anzeigt.

Dieses Formular soll das einzige Formular der Anwendung sein, wenn möglich also das MainForm. Nach dem Schließen des Formulars soll die Anwendung sich schließen.

Der Programmablauf ist also in etwa

Objekt erzeugen
mit dem Objekt was machen
irgendwann das Formular des Objektes modal anzeigen
Programm beenden

Dafür habe ich zunächst den ganzen Application.Inizialize/Run... Kram etc aus der Hauptunit entfernt und arbeite dort lediglich mit meinem Objekt. Mein Problem ist nur, dass wenn ich das Formular minimiere es nicht auf der Taskbar liegt, sondern darüber. Einen Taskbareintrag gibt es allerdings durchgehend auch.

Nächste Idee war Ein Dummy Formular als Mainform zu erzeugen und mein Objekt im OnCreate des Dummys zu erzeugen:

Delphi-Quellcode:

  Application.Initialize;
  Application.Title := 'Meine App';
  Application.CreateForm(TAppMainForm, AppMainForm);
  Application.ShowMainForm:=false;
  Application.Run;

//----------------

  procedure TAppMainForm.FormCreate(Sender: TObject);
   var MyObject:TMyObject;
begin
  [..]
  MyObject.ShowForm; // Modales anzeigen intern
  freeandnil(MyObject);
  PostMessage(self.Handle,WM_CLOSE, 0, 0); // Programm beenden
end;

Funktioniert auch, hat aber den selben Effekt, dass das spätere Formular nicht in der Taskbar liegt. Oder wenn ich mit SetWindowLong(fWindow.Handle, GWL_EXSTYLE, WS_EX_APPWINDOW); arbeite eben 2 Einträge habe...

Hat irgendjemand von euch eine Idee wie ich es hin bekomme, dass das Formular des Objektes sich so verhält wie ein Mainform, also sich in die Taskbar minimiert und es nur einen einzigen Taskbareintrag gibt?

(Borderstyle des Formulars ist bsSizeable, Formstyle ist fsNormal)

[shmia]

Zitat von kaiser1401:

Der Programmablauf ist also in etwa
Objekt erzeugen
mit dem Objekt was machen
irgendwann das Formular des Objektes modal anzeigen
Programm beenden

Also ich würde den Ablauf ändern und so allen Problemen aus dem Weg gehen.
1.) Hauptformular erzeugen (lassen)
2.) in OnCreate das Objekt erzeugen
3.) in OnShow beginnt das Objekt mit seiner (Vor-)Arbeit
4.) jetzt wird das Hauptformular sichtbar
5.) bestimmte Daten aus dem Objekt anzeigen
6.) Der Benutzer darf jetzt "Abbrechen" drücken; dann beendet sich das Programm
Oder er füllt die Felder des Formulars aus und drückt "OK"
7.) Falls "OK" gedrückt wurde, werden die Formulardaten an das Objekt gegeben, verarbeitet und anschliesend wird das Hauptformular mit Close geschlossen

[kaiser1401]

Habe ich dann nicht zwei Formulare? Also das Hauptformular der Anwendung und das aus dem Objekt?

Das angezeigte Formular ist weniger zur Eingabe gedacht denn zur Ausgabe. Es zeigt eine Art Suchergebnis an das auf Parametern beruht die zuvor mit an die Anwendung übergeben wurden. Und das anzuzeigende Formular ist das einzige was ich brauche und sollte auch das einzige sein.

[shmia]

Also deine Beschreibung ist doch recht vage und unklar.
Du versuchst krampfhaft das Hauptformular zu verstecken (Application.ShowMainForm:=false) und redest von einem modalen Formular.
Modale Formulare werden dazu benützt den Programmfluss anzuhalten und vom Benutzer eine Eingabe anzufordern.
Aber anscheinend soll der Benutzer überhaupt nichts eingeben, oder?

Dann verstehe ich nicht, warum du nicht geraderaus das Hauptformular verwendest.
1.) Programm wird gestartet
2.) Hauptformular wird erzeugt (und zwar automatisch über die Projektdatei)
3.) das Suchergebnis wird auf dem Hauptformular angezeigt
dazu kann man das Event OnCreate oder OnShow verwenden
4.) Wenn der Benutzer auf das X zum Schliesen klickt oder ALT-F4 tippt wird das Programm beendet. (auch das passiert automatisch)

Ein Screenshot (als GIF oder PNG) wäre auch hilfreich.

[kaiser1401]

Das mit dem krampfhaft stimmt schon ziemlich..

Das Objekt wurde ursprünglich mal als COM Objekt bereit gestellt um aus einer anderen Anwendung heraus aufgerufen zu werden. Es gab aber Speicher- und Zugriffsprobleme beim Aufruf aus Lotus Notes heraus weshalb das Objekt nun ohne COM in einer eigenständigen Anwendung mit Parametern gestartet wird und das Formular zur Ausgabe angezeigt wird. Das funktioniert ja auch alles wunderbar, bis auf das minimieren in die Taskleiste, so das es nur einen Taskbareintrag gibt. Ich will eigentlich ungern alles wieder umstricken (in dem Objekt und dem Formular) nur für dieses minimieren.

[rapante]

Hy Kaiser,

hier werden 2 Möglichkeiten angeführt um einer Form einen eigenen Taskbareintrag hinzuzufügen.

Den Taskbareintrag der Application verstecken:

Delphi-Quellcode:

procedure TMainForm.FormShow(Sender: TObject);
var Owner : HWnd;
begin
  Owner:=GetWindow(Handle,GW_OWNER);
  ShowWindow(Owner,SW_HIDE);
end;