object frmShareware: TfrmShareware Left = 150 Top = 141 HelpContext = 5000 ActiveControl = btnQuitter BorderIcons = [biSystemMenu] BorderStyle = bsDialog Caption = 'frmShareware' ClientHeight = 283 ClientWidth = 427 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Icon.Data = {} Position = poScreenCenter OnActivate = FormActivate OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 13 object lblDepuis: TLabel Left = 16 Top = 104 Width = 43 Height = 13 Caption = 'lblDepuis' end object lblN: TLabel Left = 288 Top = 216 Width = 25 Height = 13 Alignment = taRightJustify AutoSize = False Caption = 'lblN' Visible = False end object Label7: TLabel Left = 328 Top = 216 Width = 25 Height = 13 Caption = 'jours.' Visible = False end object Bevel1: TBevel Left = 8 Top = 232 Width = 409 Height = 50 Shape = bsTopLine end object Label1: TLabel Left = 8 Top = 16 Width = 409 Height = 29 Alignment = taCenter AutoSize = False Caption = '$$$LeBackup VERSION$$$' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -24 Font.Name = 'Arial' Font.Style = [] ParentFont = False end object Bevel2: TBevel Left = 8 Top = 56 Width = 409 Height = 9 Shape = bsTopLine end object Label2: TLabel Left = 16 Top = 216 Width = 214 Height = 13 Caption = 'Copyright � 1995-1998 by Bernard OLIVERO' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label3: TLabel Left = 16 Top = 72 Width = 401 Height = 33 AutoSize = False Caption = '$$$POSTCARDWARE$$$' WordWrap = True end object Label4: TLabel Left = 16 Top = 128 Width = 401 Height = 25 AutoSize = False Caption = '$$$IVITE A ENREGISTRER' WordWrap = True end object Label5: TLabel Left = 16 Top = 160 Width = 401 Height = 17 AutoSize = False Caption = '$$$$VERSION ENREGISTREE$$$' end object Label6: TLabel Left = 16 Top = 184 Width = 401 Height = 13 AutoSize = False Caption = '$$$POUR ENREGISTRER$$$' end object Bevel3: TBevel Left = 8 Top = 208 Width = 409 Height = 9 Shape = bsTopLine end object Image1: TImage Left = 8 Top = 8 Width = 32 Height = 32 AutoSize = True Picture.Data = {} end object BitBtn1: TBitBtn Left = 32 Top = 248 Width = 89 Height = 27 Caption = '&OK' ModalResult = 1 TabOrder = 0 Glyph.Data = { DE010000424DDE01000000000000760000002800000024000000120000000100 0400000000006801000000000000000000001000000000000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 3333333333333333333333330000333333333333333333333333F33333333333 00003333344333333333333333377F3333333333000033334224333333333333 337337F3333333330000333422224333333333333733337F3333333300003342 222224333333333373333337F3333333000034222A22224333333337F337F333 7F33333300003222A3A2224333333337F3737F337F33333300003A2A333A2224 33333337F73337F337F33333000033A33333A222433333337333337F337F3333 0000333333333A222433333333333337F337F33300003333333333A222433333 333333337F337F33000033333333333A222433333333333337F337F300003333 33333333A222433333333333337F337F00003333333333333A22433333333333 3337F37F000033333333333333A223333333333333337F730000333333333333 333A333333333333333337330000333333333333333333333333333333333333 0000} NumGlyphs = 2 end object btnQuitter: TBitBtn Left = 144 Top = 248 Width = 89 Height = 27 Caption = '$$$QUIT' TabOrder = 1 Kind = bkCancel end object btnEnreg: TBitBtn Left = 256 Top = 248 Width = 137 Height = 27 Caption = '$$$REGISTER$$$' TabOrder = 2 OnClick = btnEnregClick end object timProc: TTimer Enabled = False Interval = 1 OnTimer = timProcTimer Left = 352 Top = 8 end object timBoucle: TTimer Enabled = False Interval = 1 OnTimer = timBoucleTimer Left = 352 Top = 48 end end