| |
| |
|
Michael
Axtmann | ...voluntad no klappen!??
¡Hola,
después de ewiger rumprobiererrei y Búsqueda en XProfan Ayuda, komme Yo nun doch con dieser banalen Sache hier her:
Wenn Hice el Ventana principal heraus una neues Ventana erzeuge, se mein waitinput sólo Clicks en dei hay befindlichen Buttons verlassen, sin embargo no por Tastendruck! Was mache Yo falso????? Hab Yo qué vergessen aufs neue Ventana umzuleiten??
Saludo
PS:Im Anhang una kleines Ejemplo! Der Knopf debería con el "Space" Taste bedient voluntad puede! In beiden Fenstern!! |
|
| |
| |
| |
|
|
E.T. |
...
PROC FENSTER2
HWND% = create("window",%hwnd,"FENSTER2", 100,100, 640,480)
setactivewindow(HWND%)
button2& = Crear("Button",HWND%,"Schließen",50,50,100,50)
'Mittels Tab-Taste primero en el Button2 focusieren oder
SetFocus(Button2&)'Foco inmediatamente en el Button
mientras que xe%=1
...
Das 2. Ventana sería Yo aber en no Fall HWND% nennen...  |
|
| |
| Grüße aus Sachsen... Mario  WinXP, Win7 (64 Bit),Win8(.1),Win10, Win 11, Profan 6 - X4, XPSE, und 'nen schwarzes, blinkendes Dingens, wo ich das alles reinschütte... | 24.09.2012 ▲ |
|
| |
|
|
Michael
Axtmann | Hi,
danke, funktioniert zwar, pero yo denke el problema se "nur umschifft", porque si yo en el 2.Ventana a Kontrolle después de waitinput una imprimir %scankey einbau, entonces schreibt él me "0" !!
Nach waitinput en el Ventana principal schreibt él el richtigen Scancode....
siehe Bsp.
Grüße |
|
| |
| |
| |
|
|
E.T. | Jo, hast bastante con el "umschiffen": Mit el conjunto des Foco en el Button se entonces selbiger con el Leertaste "betätigt" - Denkfehler.
Hab ahora veces 'ne Weile probiert y determinar necesario, el wohl en un otro (focusiertem) Ventana como como en el Ventana principal el meisten Systemvariablen (wozu sí scankey gehört) el waitinput no durchbrechen. Beweis: mache en deinem Bsp. la ventana principal aktiv, entonces reagiert dein Ventana2 en el Leertaste y se geschlossen.
Das necesario wir wohl Roland veces como "Bug oder vermeintlicher" nahe legen 
Hab ahora veces en rápido alles así "umgebastelt", el lo con el Ventana2 funktioniert: Das Zauberwort (oder Nothilfe): SubClassing !!
Hab simplemente veces dein Ventana2 "gesubclasst" y el Message 257 (loslassen el Leertaste) abgefangen, ya funktioniert lo.
Posesiones allerdings el Aufruf des 2. Fensters por Leertaste veces rausgenommen:
Beim Aufrufen reagiert scankey el drücken el Taste (y öffnet el "Fenster2),el loslassen sería entonces vom 2. Ventana inmediatamente otra vez con Schließen quittiert.
Also al besten con SubClassing beschäftigen y Roland el Fehler suchen dejar, por qué sólo en el Ventana principal en el Tastatur reagiert se 
Ach sí, el en rápido "umgeschraubte" Ver código fuente:
declarar e%,xe%,taste%
declarar button1&,button2&
declarar HWND%
cls
e% = 1
xe%=1
button1& = Crear("Button",%HWND,"Start",50,50,50,50)
PROC FENSTER2
HWND% = create("window",%hwnd,"FENSTER2", 100,100, 640,480)
setactivewindow(HWND%)
button2& = Crear("Button",HWND%,"Schließen",50,50,100,50)
SubClass HWND% , 1
mientras que xe%=1
waitinput
if clicked(button2&)
imprimir "Fenster2 por Button geschlossen geschlossen!!"
xe% = 0
destroywindow(HWND%)
endif
endwhile
ENDPROC
SubClassProc
If SubClassMessage(HWND%, 257)'Leertaste loslassen
imprimir "Fenster2 en SubClassProc por Message 257 (Leertaste losgelassen) geschlossen!!"
xe% = 0
destroywindow(HWND%)
endif
ENDPROC
mientras que e%=1
waitinput
if clicked (button1&)
xe% = 1
FENSTER2
endif
endwhile
end
Gute Nacht !!! |
|
| |
| Grüße aus Sachsen... Mario WinXP, Win7 (64 Bit),Win8(.1),Win10, Win 11, Profan 6 - X4, XPSE, und 'nen schwarzes, blinkendes Dingens, wo ich das alles reinschütte... | 25.09.2012 ▲ |
|
| |
|
|
 | | ... oder simplemente Teclas rápidas por addHotKey( ... |
|
| |
| |
| |
|
|
Michael
Axtmann | Hi,
danke, dass Ihr euch el veces angeschaut habt! Hatte ya öfters así gekämpft y simplemente sólo pensamiento Yo bin a doof, aber el waitinput se definitiv manchmal simplemente no verlassen!!
Grüße |
|
| |
| |
| |
|
|
| | Auch en Tasten el con addHotKey creado voluntad? |
|
| |
| |
| |
|
|
| |
| |
| |
| |
|
(1.117)
Deutsch
English
Français
Español
Italia