OpenEuphoria

Re: how to display a clock in a window?

• Posted by Ben Fosberg <BenFosberg at ATT.NET> Oct 14, 2000
• 608 views

I received the following correction from Rett to my previous posting via email,
and agree totally with what he said - the 300 line limit applies to the
debugging, not to Eu. (I
think I also misinterpreted the original question.) My apologies to all for the
misstatement, and thanks to Rett for catching it

Ben.

>> As you may or may not remember, by agreement with Rob, I do not
>> post on the list, but you may feel free to quote me if you wish.
>>
>> Ben,
>>
>> You wrote this, and you need to retract it.
>>
>> "If you are using a "bleeding edge" version of win32lib.ew, all the
>> lines of code in that library are added to your line count, and the
>> unregistered version of Eu will not handle
>> more than 300 lines of code - unless it's in what RDS calls a
>> "stamped" library. The "stamped" version of win32lib.ew can be
>> downloaded from the RDS website (New User
>> Contributions). I didn't see anything in your code that would
>> require you to use a newer version of the library than the
>> "stamped" release."
>>
>> The unregister version of Eu will handle any number of lines of
>> code. It just won't debug more than 300 lines of code. It still
>> provides an error message when it quits just like the registered
>> version. The only limitation is in the debugger. Please correct
>> yourself.
>>
>> Everett L.(Rett) Williams
>>
>>
>>
>>
>>



YanYanCup YanYanCup wrote:

> i want to display a clock in the window that i create but i cannot do that!
> Euphoria said that my program is over 300 statment, therefore i don't know what
> happen!
> please help to check the code(many of them are copy from Brett Pantalone's
> stopwatch timer) or  suggest some suggestion of how to write it and display in a
> window thanks ^0^
>
> --cute at here
> include win32lib.ew
> without warning
> integer milliseconds, seconds, minutes, hours
> milliseconds=0
> seconds=0
> minutes=0
> hours=0
> sequence timer1
> constant new_win=create(Window,"time",0,100,100,300,300,0)
> openWindow(new_win,Normal)
> setTimer(new_win, 1, 1000 )
>
> procedure onTimer_timerWin( integer timerId )
> -- This procedure runs once every second.
>
>     -- increment the timer
>     seconds = seconds + 1
>     if seconds > 59 then
>        seconds = 0
>        minutes = minutes + 1
>        if minutes > 59 then
>           minutes = 0
>           hours = hours + 1
>        end if
>     end if
>
>     timer1=sprintf("%02d:%02d:%02",{hours,minutes,seconds})
>     setPosition(new_win,30,30)
>     wPuts(new_win,timer1)
>     -- force an onPaint event
>     --repaintWindow(Cute_light)
>
> end procedure
>
> onTimer[new_win] = routine_id( "onTimer_timerWin" )
> i have try ^^^^ 1 at here, but still can't display a clock...
> WinMain(new_win,Normal)
>
> --cute at here
>
> YanYanCup
> _____________________________________________________
> Sent by Hong Kong E-Mail at http://www.hkem.com
> It's free. It's easy. Sign up your account Now!