Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Win32/Win64 API (native code) (https://www.delphipraxis.net/17-win32-win64-api-native-code/)
-   -   Delphi Fensterverwaltung (https://www.delphipraxis.net/92560-fensterverwaltung.html)

texmurphy901 22. Mai 2007 11:09


Fensterverwaltung
 
Hallo Allerseits,
ich habe da ein kleines Problem mit dem Wiederherstellen meiner Delphi-Applikation.
Der Reihe nach:
Ich habe ein Programm, welches jede Menge Fenster besitzt. Eines dieser Fenster (MainForm) dient sozusagen als Programm - Hintergrund für die anderen Fenster und enthält das Menü, ist aber ein Form wie die anderen auch, d.h.Wenn mein Programm läuft sind immer mindestens 2 Fenster geöffnet: das mainForm(als Hintergrund) und ein weiteres, in dem der Benutzer agiert.
Problem:
Deaktiviere ich meine Applikation durch anklicken einer weiteren offenen Anwendung in der Taskbar und reaktiviere später meine Anwendung ebenfalls durch klick auf die Anwendung in der Taskleiste, so wird nur das "Aktionsfenster" aber nicht das MainForm meiner Applikation geöffnet. Erst durch erneutes Verkleinern(Klick in Taskleiste) und Vergörßern(erneuter Klick in Taskleiste) wird auch das Hintergrundfenster wieder mit angezeigt.
Meine bisherigen vergeblichen Versuche beschränkten sich auf das Handling der OnActivate - Methode der TApplicationEvents:

Delphi-Quellcode:
procedure TSplashForm.ApplicationEvents1Activate(Sender: TObject);
var MainWnd,aWnd:HWND;
begin
  aWnd := findwindow('ArtikelForm',nil);//das dient nur als Beispiel zum testen
  MainWnd := findwindow('MainForm',nil);
     // Dieses Fenster wiederherstellen
  SendMessage(aWnd,WM_SYSCOMMAND,SC_RESTORE,0);
  SendMessage(MainWnd,WM_SYSCOMMAND,SC_RESTORE,0);
  SetForegroundWindow(MainWnd);
end;
Da ich mich leider mit Windows-Messages etc. nicht so gut auskennt, weiß ich leider nicht, ob ich überhaupt die richtige Message habe :-(
Kann mir jemand helfen?
Danke
Murphy

hsg 22. Mai 2007 12:31

Re: Fensterverwaltung
 
Hallo,

wenn ich dich richtig verstehe, versuchst du etwas ähnliches wie ein MDI-Fenster-System ohne MDI-Fenster hinzubekommen.
Ich benutze in meinen Applikation etwas ähnliches, dort dient ein Fenster als Container für andere (Child-)Fenster. Den Child-Fenstern sieht man nicht mehr an, dass sie mal normale Fenster waren. Da es für das Window-System nur ein Fenster greifbar ist, habe ich diese Probleme mit deaktivieren und ähnlichem nicht. Falls das für dich evtl. von Interesse ist, kannst du dir den entsprechenden Thread ja mal zu Gemüte führen.
Sourcecode für meine Fensterverwaltung: http://www.delphipraxis.net/internal...=630354#630354
Screenshot wie das ganze in der Praxis aussieht: http://www.delphipraxis.net/internal...=630123#630123

Löst zwar dein Problem nicht, ist aber vielleicht ein Gedanken wert.

HTH Jörg

texmurphy901 22. Mai 2007 13:36

Re: Fensterverwaltung
 
Besten Dank! Ich werde es mir mal zu Gemüte führen.


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