Source wurde am 15.07.2007 aus der MMJ-Quellcodesammlung (Dietmar Horn) in die Babyklappe auf XProfan.Com abgelegt: Fenster: Alt + F4 zum Schließen eines Fensters deaktivieren PRFellow-Vorlage Autor: Thomas Hölzer Den Schließen-Button des aktiven Fensters deaktivieren oder entfernen Def GetSystemMenu(2) !USER32,GetSystemMenu Def DeleteMenu(3) !USER32,DeleteMenu Def EnableMenuItem(3) !USER32,EnableMenuItem Def DisableClose(0) If(DeleteMenu(GetSystemMenu(GetActiveWindow(),0),6,$400), SendMessage(GetActiveWindow(),$86,1,0),0) Beispiel Cls EnableMenuitem(GetSystemMenu(GetActiveWindow(),0),$F060,1) print Nach Eingabe wird auch der Schließen-Eintrag aus dem System-Menü entfern ... WaitInput print print Schauen Sie nun im System-Menü nach ... DisableClose() WaitInput
Session-Cookies