English
Forum

Static tab and Edit

 

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
 
02/05/05  
 



GetAsyncKeyState?
 
02/05/05  
 




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
 
02/05/05  
 




Rolf
Koch
thanks you both herzlichst,

no unfortunately both not. it comes with both nothing on.
WS_TABSTOP ($10000) - nunja there are SKEdits.

Rolf
 
02/05/05  
 



Hello Rolf...

WS_EX_CONTROLPARENT functions only, if the Mainwindow whom Dialogstil has:
CompileMarkSeparation
Declare 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:
CompileMarkSeparation
Declare 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

 
02/05/05  
 




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
 
02/05/05  
 



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...
 
02/05/05  
 




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.
 
02/05/05  
 




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
 
02/05/05  
 



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...
 
02/06/05  
 




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
 
02/06/05  
 




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:
CompileMarkSeparation
window 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
 
02/07/05  
 




Answer


Topictitle, max. 100 characters.
 

Systemprofile:

no Systemprofil laid out. [anlegen]

XProfan:

 Posting  Font  Smilies  ▼ 

Please register circa a Posting To verfassen.
 

Topic-Options

6.134 Views

Themeninformationen



Admins  |  AGB  |  Applications  |  Authors  |  Chat  |  Privacy Policy  |  Download  |  Entrance  |  Help  |  Merchantportal  |  Imprint  |  Mart  |  Interfaces  |  SDK  |  Services  |  Games  |  Search  |  Support

One proposition all XProfan, The there's!


My XProfan
Private Messages
Own Storage Forum
Topics-Remember-List
Own Posts
Own Topics
Clipboard
Log off
 Deutsch English Français Español Italia
Translations

Privacy Policy


we use Cookies only as Session-Cookies because of the technical necessity and with us there no Cookies of Drittanbietern.

If you here on our Website click or navigate, stimmst You ours registration of Information in our Cookies on XProfan.Net To.

further Information To our Cookies and moreover, How You The control above keep, find You in ours nachfolgenden Datenschutzerklärung.


all rightDatenschutzerklärung
i want none Cookie