object AboutForm: TAboutForm Left = 324 Top = 222 BorderIcons = [] BorderStyle = bsDialog Caption = 'About AppLaunch' ClientHeight = 429 ClientWidth = 417 Font.Color = clWindowText Font.Height = -13 Font.Name = 'System' Font.Style = [] PixelsPerInch = 96 Position = poScreenCenter Scaled = False OnCreate = FormCreate TextHeight = 16 object Memo1: TMemo Left = 8 Top = 88 Width = 401 Height = 305 Enabled = False Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] Lines.Strings = ( 'Dear user!' '' 'If you like AppLaunch, send me a T-shirt (size XL), a couple of ' + 'dollars, a ' 'postcard or whatever you think it'#39's worth to:' '' ' Anders Ohlsson' ' Tj�derv�gen 4' ' S-746 34 B�lsta' ' Sweden' '' 'I collect all sorts of T-shirts (company labels, school labels, ' + 'football teams, WWW ' 'surfing shirts and you name it).' '' 'Any donation worth $20 or more is entitled to a free update as s' + 'oon as it'#39's ready. ' 'Be sure to include your email or snail mail address.' '' 'Thanks for using AppLaunch, and see you in cyberspace...') ParentFont = False ReadOnly = True TabOrder = 2 end object Panel1: TPanel Left = 8 Top = 8 Width = 401 Height = 73 BevelInner = bvLowered TabOrder = 0 object ProgramName: TLabel Left = 8 Top = 8 Width = 385 Height = 36 Alignment = taCenter AutoSize = False Caption = 'Set at runtime' Font.Color = clBlack Font.Height = -32 Font.Name = 'Times New Roman' Font.Style = [] ParentFont = False IsControl = True end object Copyright: TLabel Left = 8 Top = 48 Width = 385 Height = 16 Alignment = taCenter AutoSize = False Caption = 'Set at runtime' Font.Color = clBlack Font.Height = -13 Font.Name = 'Arial' Font.Style = [] ParentFont = False IsControl = True end end object Button1: TButton Left = 8 Top = 400 Width = 401 Height = 25 Hint = 'Wow, a spacebar! Now, where is that OK button?|' ParentShowHint = False ShowHint = True TabOrder = 1 OnClick = Button1Click end object Panel2: TPanel Left = 272 Top = 344 Width = 128 Height = 40 Hint = 'Well, what can I say? First try in PainBrush...|' BevelOuter = bvNone Color = clWindow ParentShowHint = False ShowHint = True TabOrder = 3 object Image1: TImage Left = 0 Top = 0 Width = 128 Height = 40 Align = alClient Picture.Data = {} end end end