object Horloge: THorloge Left = 231 Top = 112 BorderIcons = [biSystemMenu] BorderStyle = bsSingle Caption = 'Horloge' ClientHeight = 156 ClientWidth = 277 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -17 Font.Name = 'System' Font.Style = [] Icon.Data = {} Scaled = False OnActivate = FormActivate OnDeactivate = FormDeactivate OnKeyPress = FormKeyPress PixelsPerInch = 120 TextHeight = 20 object Panel1: TPanel Left = 0 Top = 0 Width = 277 Height = 156 Align = alClient BevelInner = bvRaised BevelWidth = 3 Color = clBlack TabOrder = 0 object Label3: TLabel Left = 12 Top = 116 Width = 61 Height = 32 Caption = 'AMS' Font.Charset = DEFAULT_CHARSET Font.Color = clWhite Font.Height = -27 Font.Name = 'Arial' Font.Style = [fsBold, fsItalic] ParentFont = False end object Label4: TLabel Left = 8 Top = 52 Width = 153 Height = 2 AutoSize = False Caption = '---------' Color = clWhite ParentColor = False end object Panel2: TPanel Left = 12 Top = 12 Width = 142 Height = 34 BevelInner = bvLowered BevelWidth = 2 TabOrder = 0 object Label1: TLabel Left = 4 Top = 4 Width = 134 Height = 26 Align = alClient Alignment = taCenter AutoSize = False Caption = '18:23:00' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -23 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end end object Panel3: TPanel Left = 12 Top = 63 Width = 142 Height = 34 BevelInner = bvLowered BevelWidth = 2 TabOrder = 1 object Label2: TLabel Left = 4 Top = 4 Width = 134 Height = 26 Align = alClient Alignment = taCenter Caption = '20/10/1998' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -23 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end end object Button1: TButton Left = 162 Top = 112 Width = 86 Height = 32 Caption = 'Fermer' TabOrder = 2 OnClick = Button1Click OnKeyPress = FormKeyPress end object RadioGroup1: TRadioGroup Left = 162 Top = 6 Width = 58 Height = 94 Font.Charset = DEFAULT_CHARSET Font.Color = clWhite Font.Height = -17 Font.Name = 'System' Font.Style = [fsBold] Items.Strings = ( 'Hr' 'Mn' 'Jo' 'Mo' 'An') ParentFont = False TabOrder = 3 end object SpinButton1: TSpinButton Left = 236 Top = 26 Width = 20 Height = 25 DownGlyph.Data = { 7E040000424D7E04000000000000360400002800000009000000060000000100 0800000000004800000000000000000000000001000000010000000000000000 80000080000000808000800000008000800080800000C0C0C000C0DCC000F0CA A600000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000F0FBFF00A4A0A000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00030303030303 0303030000000303030300030303030000000303030000000303030000000303 0000000000030300000003000000000000000300000003030303030303030300 0000} TabOrder = 4 UpGlyph.Data = { 7E040000424D7E04000000000000360400002800000009000000060000000100 0800000000004800000000000000000000000001000000010000000000000000 80000080000000808000800000008000800080800000C0C0C000C0DCC000F0CA A600000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000F0FBFF00A4A0A000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00030303030303 0303030000000300000000000000030000000303000000000003030000000303 0300000003030300000003030303000303030300000003030303030303030300 0000} OnDownClick = SpinButton1DownClick OnUpClick = SpinButton1UpClick end object Button2: TButton Left = 228 Top = 66 Width = 37 Height = 24 Caption = 'Set' TabOrder = 5 OnClick = Button2Click end end object Timer1: TTimer OnTimer = Timer1Timer Left = 216 Top = 123 end end