OpenEuphoria

Re: IDE Grouping Issues

• Posted by Irv Mullins <irvm at ellijay.com> Aug 08, 2001
• 459 views

On Wednesday 08 August 2001 16:57, Judith wrote:

> > At the top of my form I have a group control, with four text boxes
> > within.
> > When I run the EXW, when I press <TAB>, the only controls ever selected
> > are
> > the ones in the group. I have many more outside the group. Is that
> > clear?
>
> Absolutely. But I don't do anything with the controls except create them
> in order. If you write your own exw without using IDE does it act
> differently?

The problem is with Win32Lib.
Since there is no tab order stored in the exw, the tab order must be assigned
by Win32Lib.  You can experiment by writing a small program, and moving 
the control declarations around.

include Win32Lib.ew
without warning

global constant Window1 = create( Window, "Window1", 0, Default, Default, 400,
300, 0 )
global constant Group2 = create( Group, "Group2", Window1, 44, 8, 228, 108, 0 )
global constant EditText3 = create( EditText, "EditText3", Group2, 12, 20, 150,
20, 0 )
global constant EditText4 = create( EditText, "EditText4", Group2, 12, 44, 150,
20, 0 )
global constant EditText5 = create( EditText, "EditText5", Group2, 12, 68, 150,
20, 0 )
global constant PushButton6 = create( PushButton, "PushButton6", Window1, 28,
128, 90, 30, 0 )
global constant PushButton7 = create( PushButton, "PushButton7", Window1, 220,
124, 90, 30, 0 )

WinMain( Window1, Normal )

Given the above order, tabs will only move thru the 3 edittext controls, never
to the buttons.
Now move the buttons up above the edit controls:

global constant Window1 = create( Window, "Window1", 0, Default, Default, 400,
300, 0 )
global constant PushButton6 = create( PushButton, "PushButton6", Window1, 28,
128, 90, 30, 0 )
global constant PushButton7 = create( PushButton, "PushButton7", Window1, 220,
124, 90, 30, 0 )
global constant Group2 = create( Group, "Group2", Window1, 44, 8, 228, 108, 0 )
global constant EditText3 = create( EditText, "EditText3", Group2, 12, 20, 150,
20, 0 )
global constant EditText4 = create( EditText, "EditText4", Group2, 12, 44, 150,
20, 0 )
global constant EditText5 = create( EditText, "EditText5", Group2, 12, 68, 150,
20, 0 )

WinMain( Window1, Normal )

Now tab moves between the two buttons, but never reaches the edittext controls.

I wrote the same program in Delphi, the tab moves thru the 3 edittext controls,
then to button6,
then button7, and back to edittext3, which seems to be the way most windows
programs function.

Regards,
Irv