This page (revision-2) was last changed on 20-Dec-2012 14:40 by Markus Monderkamp 

This page was created on 20-Dec-2012 11:00 by Markus Monderkamp

Only authorized users are allowed to rename pages.

Only authorized users are allowed to delete pages.

Page revision history

Version Date Modified Size Author Changes ... Change note
2 20-Dec-2012 14:40 817 bytes Markus Monderkamp to previous Tag rebol hinzugefügt
1 20-Dec-2012 11:00 800 bytes Markus Monderkamp to last Sourcecode für größenveränderbares Uhrenanwendungsfenster

Page References

Incoming links Outgoing links
RebolResizeableClock
RebolResizeableClock

Version management

Difference between version and

View first change
!! variables Uhrenfenster

Quelle: http://www.rebol.com/docs/quick-start.html \\
Inhalt von __clock.r__:

{{{
REBOL [
   Title: "Digital Clock"
   Version: 1.3.3
   Author: "Carl Sassenrath"
   Purpose: {A simple digital clock.}
]

f: layout [
   origin 0
   b: banner 140x32 rate 1
       effect [gradient 0x1 0.0.150 0.0.50]
       feel [engage: func [f a e]
                       [set-face b now/time]]
]

resize: does [
   b/size: max 20x20 min 1000x200 f/size
   b/font/size: max 24 f/size/y - 40
   b/text: "Resize Me"
   b/size/x: 1024 ; for size-text
   b/size/x: 20 + first size-text b
   f/size: b/size
   show f
]

view/options/new f 'resize
resize
insert-event-func [
   if event/type = 'resize [resize]
   event
]
do-events
}}}

[{Tag rebol}]
This page (revision-2) was last changed on 20-Dec-2012 14:40 by Markus Monderkamp  Top