OpenEuphoria

2. It is bug on Win32lib, IDE, or I am wrong?

• Posted by aku at inbox.as Jun 30, 2001
• 684 views

A> Try the example below.

A> Click on Options, then click Tab Connection.
A> Then click again tab Tariff.
A> * the textboxes are missing?
A> Then click tab Connection.
A> Close the Options window.
A> Click Options button
A> * the controls in both tabs are visible?

A> I'm using Win32Lib 55.1


A> Thanks!

A> --  code generated by Win32Lib IDE v0.10.4

A> include Win32Lib.ew
A> without warning

A> global constant Group4 = create( Group, "Status", Window1, 280, 8, 124, 88, 0
)
A> global constant lwlast = create( CText, "0:00:00", Group2, 16, 24, 232, 88, 0
)
A> setFont( lwlast,"Arial",28,Normal)
A> global constant lwtotal = create( CText, "0:00:00", Group3, 16, 28, 232, 84,
0 )
A> setFont( lwtotal,"Arial",28,Normal)
A> global constant ip = create( CText, "Not Connected", Group4, 12, 16, 104, 24,
0 )
A> global constant Radio14 = create( Radio, "Total 1", Window1, 284, 156, 150,
20, 0 )
A> global constant Radio15 = create( Radio, "Total 2", Window1, 284, 180, 150,
20, 0 )
A> global constant Radio16 = create( Radio, "Total 3", Window1, 284, 204, 150,
20, 0 )
A> global constant PushButton17 = create( PushButton, "Reset", Window1, 284,
232, 64, 36, 0 )
A> global constant PushButton18 = create( PushButton, "Options", Window1, 280,
104, 88, 36, 0 )
A> global constant ltarif = create( LText, "", Group4, 12, 44, 104, 40, 0 )
A> global constant Group24 = create( Group, "Working day: tariff 1", tabtariff,
8, 52, 132, 116, 0 )
A> global constant LText25 = create( LText, "Start from hour", Window2, 24, 76,
84, 24, 0 )
A> constant ES_NUMERIC = #2000
A> global constant t1a = create( EditText, "8", Window2, 104, 76, 32, 20,
or_all({ES_NUMERIC}) )
A> LimitText( t1a,2)
A> global constant LText27 = create( LText, "For every", Window2, 24, 96, 64,
20, 0 )
A> global constant t1b = create( EditText, "120", Window2, 28, 116, 48, 20,
or_all({ES_NUMERIC}) )
A> LimitText( t1b,7)
A> global constant LText29 = create( LText, "seconds", Window2, 80, 116, 60, 20,
0 )
A> global constant LText30 = create( LText, "Add cost", Window2, 24, 140, 100,
20, 0 )
A> global constant t1c = create( EditText, "200", Window2, 76, 140, 60, 20, 0 )
A> LimitText( t1c,8)
A> global constant Group25 = create( Group, "Working day: tariff 2", tabtariff,
148, 52, 132, 116, 0 )
A> global constant LText252 = create( LText, "Start from hour", Window2, 164,
76, 84, 24, 0 )
A> global constant t2a = create( EditText, "15", Window2, 244, 76, 32, 20,
or_all({ES_NUMERIC}) )
A> LimitText( t2a,2)
A> global constant LText272 = create( LText, "For every", Window2, 164, 96, 64,
20, 0 )
A> global constant t2b = create( EditText, "120", Window2, 168, 116, 48, 20,
or_all({ES_NUMERIC}) )
A> LimitText( t2b,7)
A> global constant LText292 = create( LText, "seconds", Window2, 220, 116, 60,
20, 0 )
A> global constant LText302 = create( LText, "Add cost", Window2, 164, 140, 100,
20, 0 )
A> global constant t2c = create( EditText, "200", Window2, 216, 140, 60, 20, 0 )
A> LimitText( t2c,8)
A> global constant Group2456 = create( Group, "Sat/Sun tariff 1", tabtariff, 8,
172, 132, 116, 0 )
A> global constant LText2557 = create( LText, "Start from hour", Window2, 24,
196, 84, 24, 0 )
A> global constant t3a = create( EditText, "8", Window2, 104, 196, 32, 20, 0 )
A> global constant LText2759 = create( LText, "For every", Window2, 24, 216, 64,
20, 0 )
A> global constant t3b = create( EditText, "120", Window2, 28, 236, 48, 20, 0 )
A> global constant LText2961 = create( LText, "seconds", Window2, 80, 236, 60,
20, 0 )
A> global constant LText3062 = create( LText, "Add cost", Window2, 24, 260, 100,
20, 0 )
A> global constant t3c = create( EditText, "150", Window2, 76, 260, 60, 20, 0 )
A> global constant Group2564 = create( Group, "Sat/Sun tariff 2", tabtariff,
148, 172, 132, 116, 0 )
A> global constant LText25265 = create( LText, "Start from hour", Window2, 164,
196, 84, 24, 0 )
A> global constant t4a = create( EditText, "15", Window2, 244, 196, 32, 20, 0 )
A> global constant LText27267 = create( LText, "For every", Window2, 164, 216,
64, 20, 0 )
A> global constant t4b = create( EditText, "90", Window2, 168, 236, 48, 20, 0 )
A> global constant LText29269 = create( LText, "seconds", Window2, 220, 236, 60,
20, 0 )
A> global constant LText30270 = create( LText, "Add cost", Window2, 164, 260,
100, 20, 0 )
A> global constant t4c = create( EditText, "150", Window2, 216, 260, 60, 20, 0 )
A> global constant tabkonek = create( TabItem, "Connection", TabControl73, 0, 0,
0, 0, 0 )
A> global constant Group76 = create( Group, " \"Connected \" if:", tabkonek, 12,
32, 264, 172, 0 )
A> global constant ciskonekmodem = create( CheckBox, "Connected through a
modem.", Group76, 12, 24, 232, 20, 0 )
A> global constant ciskoneklan = create( CheckBox, "Connected through LAN (local
area network).", Group76, 12, 52, 244, 20, 0 )
A> global constant ciskonekproxy = create( CheckBox, "Connected through proxy.",
Group76, 12, 80, 244, 20, 0 )
A> global constant PushButton80 = create( PushButton, "OK", Window2, 100, 312,
90, 30, 0 )
A> global constant PushButton81 = create( PushButton, "Cancel", Window2, 200,
312, 90, 30, 0 )

A> procedure PushButton18_onClick()
A>     openDialog(Window2)
A> end procedure
A> onClick[PushButton18] = routine_id("PushButton18_onClick")


A> WinMain( Window1, Normal )