home *** CD-ROM | disk | FTP | other *** search
/ Chip 1999 June / Chip_1999-06_cd.bin / ctenari / Hustava / KVR.EXE / 0 / RCDATA / TCALENDARFORM / TCALENDARFORM.txt
Encoding:
Text File  |  1999-03-19  |  2.5 KB  |  130 lines
  1. object CalendarForm: TCalendarForm
  2.   Left = 169
  3.   Top = 113
  4.   BorderIcons = [biSystemMenu]
  5.   BorderStyle = bsToolWindow
  6.   Caption = 'Jednoduch∩┐╜ kalend∩┐╜r'
  7.   ClientHeight = 213
  8.   ClientWidth = 518
  9.   Font.Charset = DEFAULT_CHARSET
  10.   Font.Color = clWindowText
  11.   Font.Height = -11
  12.   Font.Name = 'MS Sans Serif'
  13.   Font.Style = []
  14.   Position = poScreenCenter
  15.   Scaled = False
  16.   OnCreate = FormCreate
  17.   OnKeyPress = FormKeyPress
  18.   PixelsPerInch = 96
  19.   TextHeight = 13
  20.   object Label1: TLabel
  21.     Left = 90
  22.     Top = 8
  23.     Width = 12
  24.     Height = 13
  25.     Caption = '12'
  26.     Font.Charset = DEFAULT_CHARSET
  27.     Font.Color = clLime
  28.     Font.Height = -11
  29.     Font.Name = 'MS Sans Serif'
  30.     Font.Style = []
  31.     ParentFont = False
  32.   end
  33.   object Label2: TLabel
  34.     Left = 94
  35.     Top = 166
  36.     Width = 6
  37.     Height = 13
  38.     Caption = '6'
  39.     Font.Charset = DEFAULT_CHARSET
  40.     Font.Color = clLime
  41.     Font.Height = -11
  42.     Font.Name = 'MS Sans Serif'
  43.     Font.Style = []
  44.     ParentFont = False
  45.   end
  46.   object Label3: TLabel
  47.     Left = 170
  48.     Top = 87
  49.     Width = 6
  50.     Height = 13
  51.     Caption = '3'
  52.     Font.Charset = DEFAULT_CHARSET
  53.     Font.Color = clLime
  54.     Font.Height = -11
  55.     Font.Name = 'MS Sans Serif'
  56.     Font.Style = []
  57.     ParentFont = False
  58.   end
  59.   object Label4: TLabel
  60.     Left = 16
  61.     Top = 87
  62.     Width = 6
  63.     Height = 13
  64.     Caption = '9'
  65.     Font.Charset = DEFAULT_CHARSET
  66.     Font.Color = clLime
  67.     Font.Height = -11
  68.     Font.Name = 'MS Sans Serif'
  69.     Font.Style = []
  70.     ParentFont = False
  71.   end
  72.   object Bevel1: TBevel
  73.     Left = 8
  74.     Top = 8
  75.     Width = 177
  76.     Height = 173
  77.   end
  78.   object AnalogClock1: TAnalogClock
  79.     Left = 24
  80.     Top = 21
  81.     Width = 145
  82.     Height = 145
  83.     Active = True
  84.     ColorHands = clLime
  85.     ColorSeconds = clYellow
  86.   end
  87.   object Calendar1: TCalendar
  88.     Left = 192
  89.     Top = 8
  90.     Width = 320
  91.     Height = 169
  92.     GridLineWidth = 2
  93.     ReadOnly = True
  94.     StartOfWeek = 1
  95.     TabOrder = 0
  96.     UseCurrentDate = False
  97.     OnKeyPress = FormKeyPress
  98.   end
  99.   object Button1: TButton
  100.     Left = 437
  101.     Top = 184
  102.     Width = 75
  103.     Height = 25
  104.     Caption = '&Zavrie∩┐╜'
  105.     Default = True
  106.     TabOrder = 1
  107.     OnClick = Button1Click
  108.     OnKeyPress = FormKeyPress
  109.   end
  110.   object Panel1: TPanel
  111.     Left = 8
  112.     Top = 184
  113.     Width = 177
  114.     Height = 25
  115.     Font.Charset = DEFAULT_CHARSET
  116.     Font.Color = clWindowText
  117.     Font.Height = -23
  118.     Font.Name = 'MS Sans Serif'
  119.     Font.Style = []
  120.     ParentFont = False
  121.     TabOrder = 2
  122.   end
  123.   object Timer1: TTimer
  124.     Interval = 2000
  125.     OnTimer = Timer1Timer
  126.     Left = 216
  127.     Top = 184
  128.   end
  129. end
  130.