Beitrag, 16.07.2007 00:11: ;createCode()'Source wurde am 15.07.2007 aus der MMJ-Quellcodesammlung (Dietmar Horn) in die Babyklappe auf XProfan.Com abgelegt:'IDs abfragen über %MenuItem'Mit der Abfrage von ID's über %MENUITEM lässt sich eine Menge Abfragearbeit ersparen.'Hier im Beispiel reagieren drei Eingabeelemente (Systemmenü, Menüpunkt, Button)'auf die selbe Abfrage. Buttons reagieren ausserdem besser als mit GetFocus.'von Andreas HötkerDECLARE BEENDEN&WINDOWSTYLE 31+512WINDOWTITLE "ID's - was kann man damit tun?"WINDOW 0,0-640,440POPUP "&Programm"Appendmenu 2,"&beenden"Print "Der Quelltext zeigt das Abfragen von Eingabeelementen über die ID."Print "Hier: Drei Elemente reagieren auf die gleiche Abfrage!"PRINT "Die ID des angeklickten Elements lässt sich sehr einfach über"PRINT "%MENUITEM ermitteln."LET BEENDEN&=@Control("Button","Programm beenden",$40000000+$10000000,120,280,200,30,%HWND,2,%HINSTANCE)WHile 0=0 WAITINPUT IF @ABS(%MENUITEM)=2 Setmenuitem 0 @Messagebox("Programm wird beendet!","Hinweis",64) END endifendwhile
Dies ist die Offlinevariante vom Thread [IDs abfragen über %MenuItem].
©2006 XProfan.Com