| |
|
|
- Page 1 - |
|
Walter | X4. Lt Aiuto: WindowStyle 128 ($0080) - Das Programm kann weder mit <Strg-Esc>, <Alt-Tab> noch <Alt-F4> verlassen werden. Ich kann das Programm zwar nicht mit <ALT-F4> beenden, jedoch stets mittels <Alt-Tab> verlassen. Kann ich das irgendwie unterbinden?
windowstyle 128 window %MaxX,%MaxY declare end%,b% b%=Create("Button",%hwnd,"Ende",100,100,100,20) end%=0
whilenot end% waitinput case clicked(b%): end%=1 endwhile end |
|
|
| |
|
|
|
| |
|
- Page 1 - |
|
Jörg Sellmeyer | Mit AddHotKey geht es nicht. |
|
|
| |
|
|
|
p.specht
| Danke.
P.S.: Danke per die Reparaturen! |
|
|
| XProfan 11Computer: Gerät, daß es in Mikrosekunden erlaubt, 50.000 Fehler zu machen, zB 'daß' statt 'das'... | 01.07.2018 ▲ |
|
|
|
|
Walter | |
|
| |
|
|
|
Walter | Funktioniert bei mir leider doch nicht. |
|
|
| |
|
|
|
Jörg Sellmeyer | Was funktioniert denn nicht? Und welche Windowsversion hast du? Ich hab noch XP und kann darum per höhere Versionen keine Aussagen treffen. |
|
|
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ... | 02.07.2018 ▲ |
|
|
|
|
Walter | Windows 10 ALT+TAB wechselt weiter wie üblich in ein anderes Programm, wobei das XProfan-Programm weiterläuft und ich auch wieder zu ihm zurückwechseln kann (sowohl im Interpreter als auch in der exe). Das %uMessage-Ereignis wird nie ausgelöst. |
|
|
| |
|
|
| |
|
- Page 2 - |
|
|
Jörg Sellmeyer | Schade. Dann musst du dich wohl doch mal durch iFs Originalpost mit XPSE und nProcs durchkämpfen. |
|
|
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ... | 02.07.2018 ▲ |
|
|
|
|
Walter | Ja, mache ich. Hab schon begonnen. Danke jedenfalls! |
|
|
| |
|
|
|
| Verhindern von "Alt+Tab" per Hook funktioniert bei mir so auf XP:
Herunterladen
//XProfan 11.2, XPSE
{$cleq}
/**/
const pNam="Hux v0.1"
createMutex(0,1,pNam)
case getLastError()==183:end
/**/
//wenn unsichtbares hWnd erwünscht:
/*
windowtitle pNam
windowstyle 80 | 512 | 1024
window 0,0 - 0,0
*/
cls
print "Beenden: \qRollen\q-Taste"
/**/
userMessages wm_user+1234
initMyHook()
/**/
do{
waitInput
case (uMessage==wm_user+1234) && (ulparam==0) and (uwparam==145) : break
print uwparam,ulparam
}
/**/
whileloop 1500,100,-250 {sound loop,10}
/**/
end
nProc initMyHook{
return SetWindowsHookEx(13,procAddr(myLowLevelKeyboardHookProc),getModuleHandle(0),0)/*WH_KEYBOARD_LL*/
}
nProc myLowLevelKeyboardHookProc(long code,wp,lp){
sendMessage(hWnd,wm_user+1234,long(lp,0),long(lp,8))
case (long(lp,0)==20) and (long(lp,8)==0) : return//caps
case (long(lp,0)==9) : return//tab
CallNextHookEx(0, Code, wp, lp)
}
Zeile "case (long(lp,0)==20) and (long(lp,8)==0) : return" verhindert "Caps" zum Test als Spielerei.
"Tab" verhindern alleine hilft gegen "Alt+Tab".
Exe vielleicht einfach mal auf Windows10 probieren.
Beenden per "Rollen"-Taste. |
|
|
| |
|
|
|
Michael W. | Win 8.1 Der Task-Umschalter greift und das Programm bekommt es nicht mit. [...]
Evtl. will Microsoft damit verhindern, das man sich durch ein nicht richtig funktionierendes Programm das Multitasking blockiert.
Siehe auch: [...] |
|
|
| System: Windows 8/10, XProfan X4 Programmieren, das spannendste Detektivspiel der Welt. | 03.07.2018 ▲ |
|
|
|
|
Michael W. | Die nProc-Variante funktioniert.
Wird Zeit per ein XPSE-Update... |
|
|
| |
|
|
|
Walter | Die exe funktioniert in Windows 10 wie gewünscht - ALT+TAB schaltet nicht auf anderes Programm um! |
|
|
| |
|
|