home *** CD-ROM | disk | FTP | other *** search
- object Form3: TForm3
- Left = 321
- Top = 66
- Width = 161
- Height = 263
- BorderStyle = bsSizeToolWin
- Caption = 'Binary Clock Options'
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OnCreate = FormCreate
- PixelsPerInch = 96
- TextHeight = 13
- object Panel1: TPanel
- Left = 0
- Top = 0
- Width = 153
- Height = 236
- Align = alClient
- Color = clNavy
- TabOrder = 0
- object Label3: TLabel
- Left = 72
- Top = 177
- Width = 41
- Height = 13
- Alignment = taCenter
- Caption = ' Custom '
- Color = clBlack
- Font.Color = clFuchsia
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentColor = False
- ParentFont = False
- end
- object Label4: TLabel
- Left = 8
- Top = 8
- Width = 17
- Height = 13
- Caption = 'On'
- Font.Color = clRed
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label5: TLabel
- Left = 80
- Top = 8
- Width = 18
- Height = 13
- Caption = 'Off'
- Font.Color = clMaroon
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label6: TLabel
- Left = 40
- Top = 8
- Width = 23
- Height = 13
- Caption = 'color'
- Font.Color = clYellow
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object Label1: TLabel
- Left = 112
- Top = 74
- Width = 20
- Height = 13
- Caption = 'Size'
- Font.Color = clLime
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object Label2: TLabel
- Left = 110
- Top = 177
- Width = 39
- Height = 13
- Alignment = taCenter
- Caption = ' BitMap '
- Color = clBlack
- Font.Color = clFuchsia
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentColor = False
- ParentFont = False
- end
- object BitBtn1: TBitBtn
- Left = 128
- Top = 4
- Width = 17
- Height = 17
- Caption = '?'
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 10
- OnClick = BitBtn1Click
- end
- object CheckBox1: TCheckBox
- Left = 8
- Top = 112
- Width = 73
- Height = 17
- Caption = 'Upper time'
- Font.Color = clAqua
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- State = cbChecked
- TabOrder = 11
- OnClick = CheckBox1Click
- end
- object CheckBox2: TCheckBox
- Left = 8
- Top = 128
- Width = 65
- Height = 17
- Caption = 'Seconds'
- Font.Color = clAqua
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- State = cbChecked
- TabOrder = 12
- OnClick = CheckBox2Click
- end
- object RadioGroup2: TRadioGroup
- Left = 8
- Top = 144
- Width = 65
- Height = 65
- Caption = 'Background'
- Font.Color = clYellow
- Font.Height = -9
- Font.Name = 'MS Serif'
- Font.Style = []
- ItemIndex = 0
- Items.Strings = (
- 'Black'
- 'Custom'
- 'Clear')
- ParentFont = False
- TabOrder = 7
- OnClick = RadioGroup2Click
- end
- object Edit1: TEdit
- Left = 8
- Top = 206
- Width = 137
- Height = 21
- TabOrder = 9
- OnChange = Edit1Change
- end
- object Button1: TButton
- Left = 72
- Top = 192
- Width = 73
- Height = 17
- Caption = 'Browse'
- TabOrder = 8
- OnClick = Button1Click
- end
- object CheckBox3: TCheckBox
- Left = 8
- Top = 96
- Width = 65
- Height = 17
- Caption = 'Movable'
- Font.Color = clAqua
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- State = cbChecked
- TabOrder = 13
- OnClick = CheckBox3Click
- end
- object CheckBox4: TCheckBox
- Left = 88
- Top = 112
- Width = 57
- Height = 17
- Caption = 'Colons'
- Font.Color = clAqua
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- State = cbChecked
- TabOrder = 14
- OnClick = CheckBox4Click
- end
- object SpinEdit1: TSpinEdit
- Left = 8
- Top = 24
- Width = 41
- Height = 22
- MaxValue = 255
- MinValue = 0
- TabOrder = 0
- Value = 0
- OnChange = SpinEdit1Change
- end
- object SpinEdit2: TSpinEdit
- Left = 8
- Top = 48
- Width = 41
- Height = 22
- MaxValue = 255
- MinValue = 0
- TabOrder = 1
- Value = 0
- OnChange = SpinEdit2Change
- end
- object SpinEdit3: TSpinEdit
- Left = 8
- Top = 72
- Width = 41
- Height = 22
- MaxValue = 255
- MinValue = 0
- TabOrder = 2
- Value = 0
- OnChange = SpinEdit3Change
- end
- object SpinEdit4: TSpinEdit
- Left = 56
- Top = 24
- Width = 41
- Height = 22
- MaxValue = 255
- MinValue = 0
- TabOrder = 3
- Value = 0
- OnChange = SpinEdit4Change
- end
- object SpinEdit5: TSpinEdit
- Left = 56
- Top = 48
- Width = 41
- Height = 22
- MaxValue = 255
- MinValue = 0
- TabOrder = 4
- Value = 0
- OnChange = SpinEdit5Change
- end
- object SpinEdit6: TSpinEdit
- Left = 56
- Top = 72
- Width = 41
- Height = 22
- MaxValue = 255
- MinValue = 0
- TabOrder = 5
- Value = 0
- OnChange = SpinEdit6Change
- end
- object SpinEdit7: TSpinEdit
- Left = 104
- Top = 86
- Width = 41
- Height = 22
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- MaxValue = 32
- MinValue = 4
- ParentFont = False
- TabOrder = 6
- Value = 4
- OnChange = SpinEdit7Change
- end
- object Panel2: TPanel
- Left = 48
- Top = 24
- Width = 9
- Height = 22
- BevelOuter = bvLowered
- BevelWidth = 2
- Color = clRed
- TabOrder = 15
- end
- object Panel3: TPanel
- Left = 48
- Top = 48
- Width = 9
- Height = 22
- BevelOuter = bvLowered
- BevelWidth = 2
- Color = clLime
- TabOrder = 16
- end
- object Panel4: TPanel
- Left = 48
- Top = 72
- Width = 9
- Height = 22
- BevelOuter = bvLowered
- BevelWidth = 2
- Color = clBlue
- TabOrder = 17
- end
- object Panel5: TPanel
- Left = 88
- Top = 152
- Width = 41
- Height = 17
- BevelWidth = 2
- Caption = 'EXIT'
- Color = 4194368
- Font.Color = clRed
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 18
- OnClick = Panel5Click
- end
- object CheckBox5: TCheckBox
- Left = 88
- Top = 128
- Width = 57
- Height = 17
- Caption = 'PM light'
- Font.Color = clAqua
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- State = cbChecked
- TabOrder = 19
- OnClick = CheckBox5Click
- end
- object Panel6: TPanel
- Left = 104
- Top = 28
- Width = 43
- Height = 17
- BevelWidth = 3
- Caption = 'Restore'
- Color = clGreen
- Font.Color = clLime
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 20
- OnClick = BitBtn2Click
- end
- object Panel7: TPanel
- Left = 104
- Top = 52
- Width = 43
- Height = 17
- BevelWidth = 3
- Caption = 'Redraw'
- Color = 16384
- Font.Color = clYellow
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 21
- OnClick = Panel7Click
- OnMouseDown = Panel7MouseDown
- end
- end
- end
-