[fpc-pascal]Ummmm... anyone know why this doesn't work...
L D Blake
ldblake at sympatico.ca
Wed Jul 23 04:17:57 CEST 2003
Ok, 3 checkboxes defined on a small window on win2000...
s := 'Start processing when loaded';
OToy[1] := createwindow('Button',Cstr(S,cpt),ws_tabstop or
ws_child or ws_visible or bs_autocheckbox,
10,15,185,20,Ohandle,1,mdrProg,nil);
s := 'Exit when done';
OToy[2] := createwindow('Button',Cstr(S,cpt),ws_tabstop or
ws_child or ws_visible or bs_autocheckbox,
10,35,180,20,Ohandle,2,mdrProg,nil);
s := 'Make noise when done';
OToy[3] := createwindow('Button',Cstr(S,cpt),ws_tabstop or
ws_child or ws_visible or bs_autocheckbox,
10,55,180,20,Ohandle,3,mdrProg,nil);
Cstr is a pascal to c string converter routine that takes a normal pascal
string (S in this case) and hands the winAPI a pointer to a null terminated
buffer (cpt)... tested and working elsewhere as well so that's not the
problem.
The little app is up and going, error free, but for the life or me I can't get
the ws_tabstop function to work... When the app loads nobody has focus and I
can hit the tab key all day and nothing happens...
Why can't I tab between these controls?
-----
L D Blake
More information about the fpc-pascal
mailing list