1. Re[4]: It is bug on Win32lib, IDE, or I am wrong?
- Posted by aku at inbox.as
Jul 04, 2001
I try again with deleted long dashes
# My Question (marked with "*")
Click on Options, then click Tab Connection.
Then click again tab Tariff.
* the textboxes are missing?
Then click tab Connection.
Close the Options window.
Click Options button
* the controls in both tabs are visible?
I'm using Win32Lib 55.1
Thanks!
# The Code
-- code generated by Win32Lib IDE v0.10.4
include Win32lib.ew.55
without warning
-- Window Window1
global constant Window1 = create( Window, "Internet Meter", 0, Default,
Default, 425, 314, 0 )
global constant Group2 = create( Group, "Last Connection", Window1, 8, 8,
264, 132, 0 )
global constant Group3 = create( Group, "Total Connection", Window1, 8,
144, 264, 132, 0 )
global constant Group4 = create( Group, "Status", Window1, 280, 8, 124, 88,
0 )
global constant lwlast = create( CText, "0:00:00", Group2, 16, 24, 232, 88,
0 )
setFont( lwlast,"Arial",28,Normal)
global constant lwtotal = create( CText, "0:00:00", Group3, 16, 28, 232,
84, 0 )
setFont( lwtotal,"Arial",28,Normal)
global constant ip = create( CText, "Not Connected", Group4, 12, 16, 104,
24, 0 )
global constant Radio14 = create( Radio, "Total 1", Window1, 284, 156, 150,
20, 0 )
global constant Radio15 = create( Radio, "Total 2", Window1, 284, 180, 150,
20, 0 )
global constant Radio16 = create( Radio, "Total 3", Window1, 284, 204, 150,
20, 0 )
global constant PushButton17 = create( PushButton, "Reset", Window1, 284,
232, 64, 36, 0 )
global constant PushButton18 = create( PushButton, "Options", Window1, 280,
104, 88, 36, 0 )
global constant ltarif = create( LText, "", Group4, 12, 44, 104, 40, 0 )
-- Window Window2
global constant Window2 = create( Window, "Options", Window1, Default,
Default, 309, 377, 0 )
global constant TabControl73 = create( TabControl, "TabControl73", Window2,
4, 4, 292, 304, 0 )
global constant tabtariff = create( TabItem, "Tariff", TabControl73, 0, 0,
0, 0, 0 )
global constant Group24 = create( Group, "Working day: tariff 1",
tabtariff, 8, 52, 132, 116, 0 )
global constant LText25 = create( LText, "Start from hour", Window2, 24,
76, 84, 24, 0 )
constant ES_NUMERIC = #2000
global constant t1a = create( EditText, "8", Window2, 104, 76, 32, 20,
or_all({ES_NUMERIC}) )
LimitText( t1a,2)
global constant LText27 = create( LText, "For every", Window2, 24, 96, 64,
20, 0 )
global constant t1b = create( EditText, "120", Window2, 28, 116, 48, 20,
or_all({ES_NUMERIC}) )
LimitText( t1b,7)
global constant LText29 = create( LText, "seconds", Window2, 80, 116, 60,
20, 0 )
global constant LText30 = create( LText, "Add cost", Window2, 24, 140, 100,
20, 0 )
global constant t1c = create( EditText, "200", Window2, 76, 140, 60, 20, 0 )
LimitText( t1c,8)
global constant Group25 = create( Group, "Working day: tariff 2",
tabtariff, 148, 52, 132, 116, 0 )
global constant LText252 = create( LText, "Start from hour", Window2, 164,
76, 84, 24, 0 )
global constant t2a = create( EditText, "15", Window2, 244, 76, 32, 20,
or_all({ES_NUMERIC}) )
LimitText( t2a,2)
global constant LText272 = create( LText, "For every", Window2, 164, 96,
64, 20, 0 )
global constant t2b = create( EditText, "120", Window2, 168, 116, 48, 20,
or_all({ES_NUMERIC}) )
LimitText( t2b,7)
global constant LText292 = create( LText, "seconds", Window2, 220, 116, 60,
20, 0 )
global constant LText302 = create( LText, "Add cost", Window2, 164, 140,
100, 20, 0 )
global constant t2c = create( EditText, "200", Window2, 216, 140, 60, 20, 0
LimitText( t2c,8)
global constant Group2456 = create( Group, "Sat/Sun tariff 1", tabtariff,
8, 172, 132, 116, 0 )
global constant LText2557 = create( LText, "Start from hour", Window2, 24,
196, 84, 24, 0 )
global constant t3a = create( EditText, "8", Window2, 104, 196, 32, 20, 0 )
global constant LText2759 = create( LText, "For every", Window2, 24, 216,
64, 20, 0 )
global constant t3b = create( EditText, "120", Window2, 28, 236, 48, 20, 0 )
global constant LText2961 = create( LText, "seconds", Window2, 80, 236, 60,
20, 0 )
global constant LText3062 = create( LText, "Add cost", Window2, 24, 260,
100, 20, 0 )
global constant t3c = create( EditText, "150", Window2, 76, 260, 60, 20, 0 )
global constant Group2564 = create( Group, "Sat/Sun tariff 2", tabtariff,
148, 172, 132, 116, 0 )
global constant LText25265 = create( LText, "Start from hour", Window2,
164, 196, 84, 24, 0 )
global constant t4a = create( EditText, "15", Window2, 244, 196, 32, 20, 0 )
global constant LText27267 = create( LText, "For every", Window2, 164, 216,
64, 20, 0 )
global constant t4b = create( EditText, "90", Window2, 168, 236, 48, 20, 0 )
global constant LText29269 = create( LText, "seconds", Window2, 220, 236,
60, 20, 0 )
global constant LText30270 = create( LText, "Add cost", Window2, 164, 260,
100, 20, 0 )
global constant t4c = create( EditText, "150", Window2, 216, 260, 60, 20, 0
global constant tabkonek = create( TabItem, "Connection", TabControl73, 0,
0, 0, 0, 0 )
global constant Group76 = create( Group, " \"Connected \" if:", tabkonek,
12, 32, 264, 172, 0 )
global constant ciskonekmodem = create( CheckBox, "Connected through a
modem.", Group76, 12, 24, 232, 20, 0 )
global constant ciskoneklan = create( CheckBox, "Connected through LAN
(local area network).", Group76, 12, 52, 244, 20, 0 )
global constant ciskonekproxy = create( CheckBox, "Connected through
proxy.", Group76, 12, 80, 244, 20, 0 )
global constant PushButton80 = create( PushButton, "OK", Window2, 100, 312,
90, 30, 0 )
global constant PushButton81 = create( PushButton, "Cancel", Window2, 200,
312, 90, 30, 0 )
procedure PushButton18_onClick ()
openDialog(Window2)
end procedure
onClick[PushButton18] = routine_id("PushButton18_onClick")
WinMain(Window1, Normal)
