| |
| |
|
Rolf
Koch | Huhu Personas,
heute tener Yo ne el turno de preguntas:
Tiene una ne Concepto:
@Control(STATIC,txt$,$54000106,x%,y%,breit%,hoch%,fenster&,$7918,%hInstance)
hay mentira Edits en él. Logischerweise kann Yo esta no con el Tabtaste anspringen. Logisch, porque es kein Diálogo y yo kann diesem Teil no 512él Valor conjunto.
Auch una Exwert $200 funktioniert no.
Yo necesidad el Teil aber. Leider klappt lo con Getkeystate(9) auch no.
Ist sólo blöde, si uno no con el Tabtaste zwischen el Edits hin y herspringen kann.
Hab alles intenta.
Aber, habe todavía una bisschen Hoffnung  , como nichts unmöglich es.
Rolf |
|
| |
| |
| |
|
|
 | |
| |
| |
| |
|
|
Frank
Abbing | Hi,
probier veces:
KompilierenMarcaSeparación@Control("STATIC",txt$,$54000106,x%,y%,breit%,hoch%,fenster&,$7918,%hinstance,$10000) ;WS_EX_CONTROLPARENT>
En el Edits mußt du entonces wohl el Windowsstyle WS_TABSTOP ($10000) setzten |
|
| |
| |
| |
|
|
Rolf
Koch | Gracias Euch beiden herzlichst,
nee desafortunadamente beides no. Lo kommt en beiden nix a.
WS_TABSTOP ($10000) - nunja lo son SKEdits.
Rolf |
|
| |
| |
| |
|
|
| ¡Hola Rolf...
WS_EX_CONTROLPARENT funktioniert sólo, si la ventana principal de la Dialogstil ha:
KompilierenMarcaSeparaciónDeclare Static&,Edits&[5],fenster&,Focus%,txt$
Def @GetAsyncKeyState(1) !"User32","GetAsyncKeyState"
WINDOWSTYLE 31+512
WINDOWTITLE "STATIC Control und Tabtaste",TXT$
Window 0,0-640,440
LET FENSTER&=%HWND
LET TXT$="Test"
LET STATIC&=@Control("STATIC",txt$,$54000106+15,10,10,210,300,fenster&,$7918,%hinstance,$10000)
LET EDITs&[1]=@CREATEEDIT(STATIC&,"",10,10,200,25)
LET EDITs&[2]=@CREATEEDIT(STATIC&,"",10,50,200,25)
LET EDITs&[3]=@CREATEEDIT(STATIC&,"",10,90,200,25)
LET EDITs&[4]=@CREATEEDIT(STATIC&,"",10,130,200,25)
LET EDITs&[5]=@CREATEEDIT(STATIC&,"",10,170,200,25)
@SETFOCUS(EDITs&[1])
LET FOCUS%=1
@GetAsyncKeyState(9) Reset
Whilenot %MENUITEM=-2
Waitinput
WEND
GetAsyncKeyState funktioniert sólo sin Waitinput:
KompilierenMarcaSeparaciónDeclarar Static&,Edits&[5],fenster&,Foco%,txt$
Def @GetAsyncKeyState(1) !"User32","GetAsyncKeyState"
WINDOWSTYLE 31+512
WINDOWTITLE "STATIC Control y Tabtaste",TXT$
Ventana 0,0-640,440
LET FENSTER&=%HWND
LET TXT$="Test"
LET STATIC&=%HWND
LET STATIC&=@Control("STATIC",txt$,$54000106,10,10,210,300,fenster&,$7918,%hInstance)
LET EDITs&[1]=@CREATEEDIT(STATIC&,"",10,10,200,25)
LET EDITs&[2]=@CREATEEDIT(STATIC&,"",10,50,200,25)
LET EDITs&[3]=@CREATEEDIT(STATIC&,"",10,90,200,25)
LET EDITs&[4]=@CREATEEDIT(STATIC&,"",10,130,200,25)
LET EDITs&[5]=@CREATEEDIT(STATIC&,"",10,170,200,25)
@GetAsyncKeyState(9) Reset
Sinestar encargado %MENUITEM=-2
Sleep 100
IF @GetAsyncKeyState(9)<>0
inc Foco%
CASE FOCUS%=6 : LET FOCUS%=1
@SETFOCUS(EDITs&[Foco%])
Sleep 200
ENDIF
WEND
|
|
| |
| |
| |
|
|
Rolf
Koch | Hi Andreas,
el con el Ventana principal wusste Todavía no, daß dies entonces auch Auswirkungen en el Childs ha.
Sieht fast bien de, el Keyklick se registriert.
Jetzt muss Yo sólo todavía hinbekommen, daß
If getkeystate(9)
if getfocus(blablaedit&)
hier erkannt se. Macht no auch no con getchild para skcontrols.
endif
endif
Super y Gracias para el Referencia.
Rolf |
|
| |
| |
| |
|
|
| ¡Hola Rolf...
Auch para GetAsyncKeyState gilt:
Si el Parentfenster no el Dialostil ha, Será mejor que te va unideal (zweiweise Messagebeeps beim Weiterschalten).
Daß el Parentfenster el Dialogstil haben muß, es eigentlich logisch:
Wenn uno con WS_EX_CONTROLPARENT el Kontrolle a el Parentfenster abgibt, muß dieses en efecto qué con el Tabtaste anfangen puede... |
|
| |
| |
| |
|
|
Frank
Abbing | Hi,
AH: Der Dialogstil es Rolands Erfindung. Den hay bajo Windows nada, pero así se Profans Subclassing des Hauptfensters anders gehandhabt. Bestimmte Messages voluntad ausgefiltert, por lo tanto macht dir GetAsyncKeyState() auch Problemas. El Tastaturmessages voluntad simplemente rausgefiltert y gelangen nada a para Profanprogramm.
Rolf: WS_EX_CONTROLPARENT debería eigentlich deine Solución ser. WS_TABSTOP müßtest du en el SKControls nachträglich setzten, con Get/SetStyle. Getestet Yo lo allerdings no. |
|
| |
| |
| |
|
|
Rolf
Koch | Gracias Euch beiden,
voluntad veces con Setstyle y Getstyle versuchen.
Sebastian ha me geschrieben, daß él veces después de su SKControl y el Edits schaut y direkt algo como zulässt.
Nochmals vielen - vielen Dank
Rolf |
|
| |
| |
| |
|
|
| ¡Hola Franco...
Normale Profano-Edits dürften el Stil WS_TABSTOP ya enthalten. Hier bringt una WS_EX_CONTROLPARENT allein beim STATIC gar nichts - si la ventana principal no el Dialogfensterstil ha. Como gesgt es el laut Profanhilfe así auch logisch.
GETASYNCKEYSTATE funktioniert auch sin el Dialogfesterstil en el Ventana principal. Problema es eigentlich sólo el Messagebeep, si la ventana principal intenta el Tastaturdruck a behandeln. Es, como dijo, unschön.
@Rolf
Das una SETSTYLE oder GETSTYLE dir como a irgeneiner Punto qué bringt, kann Yo genausowenig vorstellen como Franco...
Usted könntest tal vez versuchen, el STATIC en una gleichgroßen Diálogo a redactar, el dürfte entonces ir (no getestet). Ob en el Controls el SKCONTROL.DLL el Stil WS_TABSTOP enthalten es, kann Yo allerdings no sagen - como müßte entonces evtl. SETSTYLE y GETSTYLE einspringen... |
|
| |
| |
| |
|
|
Rolf
Koch | Hi AH,
el me está sí alles klar:
Yo sí el Static en el Diaolg 
Auch Tuve antes SETSTYLE oder GETSTYLE en SKControls anzuwenden y no el Static.
Rolf |
|
| |
| |
| |
|
|
Uwe
''Pascal''
Niemeier | ¡Hola Rolf!
Müssen porque el Edits necesariamente en el Static?
Usted könntest ellos auch en el Diálogo packen y así positionieren, dass ellos bajo el Static mentira. Optisch debería el zumindest en normalen Controls no hay diferencia hacer:
KompilierenMarcaSeparaciónwindow 100,100-500,500
declare dlg&
dlg&=create("dialog",%hwnd,"Info",200,200,300,300)
control("static","",$50000000,5,5,200,200,dlg&,1,0,$200)Static + Rahmen
create("edit",dlg&,"aaa",20,20,80,22)
create("edit",dlg&,"bbb",20,50,80,22)
create("edit",dlg&,"ccc",20,90,80,22)
while 1
waitinput
le
HTH
Pascal |
|
| |
| |
| |
|
(1.593)
Deutsch
English
Français
Español
Italia