Minimiertes FensterZusatz-Befehl Minimieren abfangen



'Minimiertes' FensterZusatz-Befehl Minimieren abfangen

Horst Horn, 01.03.2008 08:20: Hallo an Alle
In meinem Programm soll gesteuert die Programm-Oberfläche minimiert oder maximiert werden. Ich habe die Buttons 'Bild-Oben' und 'Bild-Unten' mit den Befehlen "ShowNormal" und "ShowMin" belegt.
Zusätzlich muss beim Wiederanzeigen (Shownormal) ein offener Editor geschlossen werden. Beispiel: SetText edit&,"" und EnableWindow edit&,0 - Das klappt auch hervorragend mit den beiden Bild-Buttons.
Mache ich das gleiche mit den System-Menu-Buttons, kann ich diese Deaktivierung des Editors nicht eingeben. Wenn ich auf den Statuszeileneintrag klicke, öffnet Windows wohl wieder das Fenster, aber die Deaktivierung des Editors kann ich nicht angeben. Gibt es dafür eine Message, mit der ich beim Mausklick ebenfalls die zwei Befehle eingeben kann ? - Hoffe, ich hab mich verständlich ausgedrückt


David Strutz, 01.03.2008 12:59: Magst per UserMessages oder SubClassProc (XProfan11)?
wm_syscommand [...]


David Strutz, 01.03.2008 13:22: ;createCode()CLSSUBCLASS %HWND,1WHILE 1   WAITINPUTENDWHILESUBCLASSPROC   SELECT &SWND      CASEOF %HWND      SELECT %SMESSAGE         CASEOF $0112'wm_syscommand         SELECT &SWPARAM            CASEOF 61472'sc_minimize            MESSAGEBOX("minimiert","",4096)            CASEOF 61728'sc_restore            MESSAGEBOX("wiederhergestellt","",4096)         ENDSELECT      ENDSELECT   ENDSELECT   SETWINPROC 1ENDPROC;createCode(){$cleq}
cls
subClass hWnd,true
do {

waitInput

/* geht nicht weil wm_syscommand als usermessage xprofan bei mir hängen bleiben lässt

select uMessage

caseof wm_syscommand

select ulParam

caseof sc_minimize

'messageBox("minimiert","",4096)

endSelect

endSelect

*/

}
subClassProc{

select sWnd

caseof hWnd

select sMessage

caseof wm_sysCommand

select swParam

caseof sc_minimize

messageBox("minimiert","",4096)

caseof sc_restore

messageBox("wiederhergestellt","",4096)

endSelect

endSelect

endSelect

setWinProc true

}

minimizetest.exe


Horst Horn, 01.03.2008 13:33: @iF('')Magst per UserMessages oder SubClassProc (XProfan11)? Weiss ich noch nicht - aber trotzdem Danke
Hab die 1.Variante genommen - klappt perfekt !


Dies ist die Offlinevariante vom Thread [Minimiertes FensterZusatz-Befehl Minimieren abfangen].

Valid CSS!

©2006 XProfan.Com