object frmMain: TfrmMain Left = 125 Top = 112 Width = 675 Height = 426 BorderIcons = [biSystemMenu] Font.Color = clWindowText Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] WindowState = wsMaximized OnCloseQuery = FormCloseQuery OnCreate = FormCreate PixelsPerInch = 120 TextHeight = 16 object Gradient1: TGradient Left = 0 Top = 0 Width = 667 Height = 399 ColorStart = clBlue ColorEnd = clBlack end object lblShadowName: TLabel Left = 14 Top = 12 Width = 328 Height = 67 Caption = 'LeapFTP 1.4' Font.Color = clBlack Font.Height = -60 Font.Name = 'Times New Roman' Font.Style = [fsBold, fsItalic] ParentFont = False Transparent = True end object lblTopName: TLabel Left = 12 Top = 8 Width = 328 Height = 67 Caption = 'LeapFTP 1.4' Font.Color = clWhite Font.Height = -60 Font.Name = 'Times New Roman' Font.Style = [fsBold, fsItalic] ParentFont = False Transparent = True end object Label4: TLabel Left = 12 Top = 84 Width = 218 Height = 31 Caption = 'by: LeapWare, Inc.' Font.Color = clBlack Font.Height = -27 Font.Name = 'Times New Roman' Font.Style = [fsBold, fsItalic] ParentFont = False Transparent = True end object Label3: TLabel Left = 9 Top = 81 Width = 218 Height = 31 Caption = 'by: LeapWare, Inc.' Font.Color = clWhite Font.Height = -27 Font.Name = 'Times New Roman' Font.Style = [fsBold, fsItalic] ParentFont = False Transparent = True end object WelcomePanel: TPanel Left = 10 Top = 204 Width = 295 Height = 181 BevelWidth = 2 TabOrder = 0 object imgIcon: TImage Left = 16 Top = 30 Width = 69 Height = 79 Picture.Data = {} end object lblProgramName: TLabel Left = 114 Top = 62 Width = 3 Height = 16 Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object lblWelcome: TLabel Left = 100 Top = 28 Width = 170 Height = 16 Caption = 'Welcome to LeapFTP Setup' Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label2: TLabel Left = 100 Top = 56 Width = 3 Height = 16 WordWrap = True end object lblProgram: TLabel Left = 100 Top = 56 Width = 153 Height = 32 Caption = 'This program will install LeapFTP on your system.' Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False WordWrap = True end object Label1: TLabel Left = 100 Top = 96 Width = 141 Height = 17 Caption = 'Click Cancel to abort.' Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False WordWrap = True end object btnContinue: TButton Left = 35 Top = 129 Width = 90 Height = 28 HelpContext = 1003 Caption = 'Continue' Default = True ModalResult = 1 TabOrder = 0 OnClick = btnContinueClick end object btnCancel: TButton Left = 150 Top = 129 Width = 91 Height = 29 HelpContext = 1003 Caption = 'Cancel' ModalResult = 1 TabOrder = 1 OnClick = btnCancelClick end end object PathPanel: TPanel Left = 344 Top = 112 Width = 314 Height = 272 BevelWidth = 2 Caption = 'PathPanel' TabOrder = 1 object lblDestDir: TLabel Left = 18 Top = 18 Width = 194 Height = 16 Caption = 'Select a directory for installation:' Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object txtDestPath: TEdit Left = 16 Top = 44 Width = 281 Height = 24 TabOrder = 0 end object btnDirContinue: TButton Left = 208 Top = 81 Width = 89 Height = 29 HelpContext = 1003 Caption = 'Continue' Default = True ModalResult = 1 TabOrder = 1 OnClick = btnDirContinueClick end object btnDestCancel: TButton Left = 208 Top = 117 Width = 89 Height = 29 HelpContext = 1003 Caption = 'Cancel' ModalResult = 1 TabOrder = 2 OnClick = btnCancelClick end object dir: TDirectoryListBox Left = 16 Top = 80 Width = 177 Height = 133 ItemHeight = 16 TabOrder = 3 OnChange = dirChange end object drive: TDriveComboBox Left = 16 Top = 224 Width = 177 Height = 22 TabOrder = 4 OnChange = driveChange OnClick = driveClick end end object RegProgram: TRegProgram ProgName = 'LeapFTP' ProgramID = '214065' Expired = False Left = 88 Top = 144 end end