home *** CD-ROM | disk | FTP | other *** search
/ TestDrive Super Store 2.3 / TESTDRIVE_2.ISO / realizer / samples / custctrl / clock.rlz < prev    next >
Encoding:
Text File  |  1992-09-30  |  589 b   |  21 lines
  1. '***********************************************************************
  2. '    Clock.rlz                      
  3. '
  4. '    Custom Control Sample Program
  5. '
  6. '    Copyright ⌐ 1991-1992 Computer Associates International, Inc.
  7. '    All rights reserved.
  8. '
  9. '***********************************************************************
  10.  
  11. RUN "CCLib1"   
  12.  
  13. fontClock = FontQUnique 
  14. FontNew(fontClock; "helv", 28, _Bold) 
  15. FormNew(10) 
  16. FormSetColor(_Yellow; _Background) 
  17. FormSetColor(_Yellow; _Field) 
  18. FormSetColor(_Blue; _Text) 
  19. FormSetObject(20, _DigitalClock, "", fontClock, _Center, _Center) 
  20. FormControl(_Show)  
  21.