| |
|
|
Rolf Koch | Huhu people,
today Have I time ne question: has of/ one ne idea: @Control(STATIC,txt$,$54000106,x%,y%,wide%,high%,fenster&,$7918,%hinstance) there lying Edits on it. Logischerweise can I these not the Tabtaste start. logical, because its no dialog what about me can this part none 512it worth settle. too one Exwert $200 not working. I need the part but. unfortunately works it with Getkeystate(9) neither. is hold stupid, if one not the Tabtaste between whom Edits there and herspringen can. Have everything attempts.
but, have another bisschen hope , there nothing unmöglich is.
Rolf |
|
|
| |
|
|
|
| |
|
| |
|
|
|
Frank Abbing | Hi,
probier time: CompileMarkSeparation@Control("STATIC",txt$,$54000106,x%,y%,breit%,hoch%,fenster&,$7918,%hinstance,$10000) ;WS_EX_CONTROLPARENT > with whom Edits must You then well whom Windowsstyle WS_TABSTOP ($10000) set |
|
|
| |
|
|
|
Rolf Koch | thanks you both herzlichst,
no unfortunately both not. it comes with both nothing on. WS_TABSTOP ($10000) - nunja there are SKEdits.
Rolf |
|
|
| |
|
|
|
| Hello Rolf...
WS_EX_CONTROLPARENT functions only, if the Mainwindow whom Dialogstil has: CompileMarkSeparationDeclare 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 functions only without Waitinput: CompileMarkSeparationDeclare Static&,Edits&[5],fenster&,Focus%,txt$
Def @GetAsyncKeyState(1) !"User32","GetAsyncKeyState"
WINDOWSTYLE 31+512
WINDOWTITLE "STATIC Control and Tabtaste",TXT$
Window 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
Whilenot %MENUITEM=-2
Sleep 100
IF @GetAsyncKeyState(9)<>0
inc Focus%
CASE FOCUS%=6 : LET FOCUS%=1
@SETFOCUS(EDITs&[Focus%])
Sleep 200
ENDIF
WEND
|
|
|
| |
|
|
|
Rolf Koch | Hi Andreas,
with the the Mainwindow known I not yet, that this then too Auswirkungen on The Childs has. sees almost well from, the Keyklick becomes registered. now must I it only yet hinbekommen, that
If getkeystate(9) if getfocus(blablaedit&) here recognized becomes. power not neither with getchild for skcontrols. endif
endif
super and thanks for Info. Rolf |
|
|
| |
|
|
|
| Hello Rolf...
too for GetAsyncKeyState counts: If the Parentfenster not whom Dialostil has, Better get going unideal (zweiweise Messagebeeps at Weiterschalten).
that the Parentfenster whom Dialogstil having must, is really logical: If one with WS_EX_CONTROLPARENT The control on the Parentfenster abgibt, must this indeed what with the Tabtaste begin can... |
|
|
| |
|
|
|
Frank Abbing | Hi,
AH: The Dialogstil is Rolands invention. whom there under windows none, separate so becomes Profans Subclassing the Mainwindow differently gehandhabt. defined Messages go ausgefiltert, therefore power you GetAsyncKeyState() too Problems. The Tastaturmessages go simply rausgefiltert and gelangen none until Profanprogramm.
Rolf: WS_EX_CONTROLPARENT ought to really your Solution his. WS_TABSTOP müßtest You with whom SKControls as an afterthought set, with Get/SetStyle. Getestet have I it though not. |
|
|
| |
|
|
|
Rolf Koch | thanks you both, will be time with Setstyle and Getstyle try. Sebastian has me written, that it time to its SKControl and the Edits schaut and directly something like zulässt.
over again many - many Thanks Rolf |
|
|
| |
|
|
|
| Hello Frank...
normal Profan-Edits dürften whom Style WS_TABSTOP already include. here yielding WS_EX_CONTROLPARENT alone at STATIC quite nothing - if the Mainwindow not whom Dialogfensterstil has. How gesgt is the loudly Profanhilfe so too logical. GETASYNCKEYSTATE functions too without whom Dialogfesterstil in the Mainwindow. trouble is really only the Messagebeep, if the Mainwindow attempts whom Tastaturdruck To treat. this is, How said, unschön.
@Rolf the one SETSTYLE or GETSTYLE you there on irgeneiner place what bring, can I me genausowenig present How Frank... You could Perhaps try, whom STATIC on one gleichgroßen dialog to create, the might then weg (not tested). whether into Controls the SKCONTROL.DLL the Style WS_TABSTOP include is, can I though not say - there should then evtl. SETSTYLE and GETSTYLE einspringen... |
|
|
| |
|
|
|
Rolf Koch | Hi AH,
this is me Yes everything clear: I Have Yes the Static on the Diaolg too I had to SETSTYLE or GETSTYLE on SKControls anzuwenden and not the Static.
Rolf |
|
|
| |
|
|
|
Uwe ''Pascal'' Niemeier | Hello Rolf!
must because The Edits absolutely on the Static? You could tappt im dunkeln on whom dialog pack and so positionieren, that they under the Static lying. Optisch ought to the at least with normalen Controls none Difference make: CompileMarkSeparationwindow 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 |
|
|
| |
|
|