| |
| |
|
| - Seite 1 - |
|
Walter | X4. Lt Hilfe: 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 |
|
| |
| |
| |
|
|
| |
| |
| - Seite 1 - |
|
Jörg
Sellmeyer | | Mit AddHotKey geht es nicht. |
|
| |
| |
| |
|
|
p.specht
 | Danke.
P.S.: Danke für 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 für 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. |
|
| |
| |
| |
|
| |
| |
| - Seite 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 für ein XPSE-Update... |
|
| |
| |
| |
|
|
Walter | | Die exe funktioniert in Windows 10 wie gewünscht - ALT+TAB schaltet nicht auf anderes Programm um! |
|
| |
| |
| |
|
(852)
Deutsch
English
Français
Español
Italia