object dlgDirectories: TdlgDirectories Left = 201 Top = 107 BorderIcons = [] BorderStyle = bsDialog Caption = 'Select Installation Directories' ClientHeight = 250 ClientWidth = 396 Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] PixelsPerInch = 96 Position = poScreenCenter OnShow = FormShow TextHeight = 13 object Panel1: TPanel Left = 0 Top = 209 Width = 396 Height = 41 Align = alBottom TabOrder = 0 object OKBtn: TBitBtn Left = 48 Top = 8 Width = 77 Height = 27 Caption = 'Ok' TabOrder = 0 Kind = bkOK Margin = 2 Spacing = -1 IsControl = True end object CancelBtn: TBitBtn Left = 128 Top = 8 Width = 77 Height = 27 TabOrder = 1 OnClick = CancelBtnClick Kind = bkCancel Margin = 2 Spacing = -1 IsControl = True end object HelpBtn: TBitBtn Left = 208 Top = 8 Width = 77 Height = 27 Caption = 'Help' TabOrder = 2 OnClick = HelpBtnClick Kind = bkHelp Margin = 2 Spacing = -1 IsControl = True end end object pnlGroupProperties: TPanel Left = 136 Top = 0 Width = 260 Height = 209 Align = alRight TabOrder = 1 object Label1: TLabel Left = 32 Top = 152 Width = 41 Height = 13 Caption = 'Source' end object Label2: TLabel Left = 8 Top = 184 Width = 65 Height = 13 Caption = 'Destination' end object btnSource: TSpeedButton Left = 232 Top = 152 Width = 25 Height = 20 Glyph.Data = { 78010000424D7801000000000000760000002800000020000000100000000100 04000000000000000000120B0000120B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555550FF0559 1950555FF75F7557F7F757000FF055591903557775F75557F77570FFFF055559 1933575FF57F5557F7FF0F00FF05555919337F775F7F5557F7F700550F055559 193577557F7F55F7577F07550F0555999995755575755F7FFF7F5570F0755011 11155557F755F777777555000755033305555577755F75F77F55555555503335 0555555FF5F75F757F5555005503335505555577FF75F7557F55505050333555 05555757F75F75557F5505000333555505557F777FF755557F55000000355557 07557777777F55557F5555000005555707555577777FF5557F55553000075557 0755557F7777FFF57555553350000055555555775777775555550000} NumGlyphs = 2 OnClick = btnSourceClick end object btnDestination: TSpeedButton Left = 232 Top = 184 Width = 25 Height = 20 Glyph.Data = { 78010000424D7801000000000000760000002800000020000000100000000100 04000000000000000000120B0000120B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555550FF0559 1950555FF75F7557F7F757000FF055591903557775F75557F77570FFFF055559 1933575FF57F5557F7FF0F00FF05555919337F775F7F5557F7F700550F055559 193577557F7F55F7577F07550F0555999995755575755F7FFF7F5570F0755011 11155557F755F777777555000755033305555577755F75F77F55555555503335 0555555FF5F75F757F5555005503335505555577FF75F7557F55505050333555 05555757F75F75557F5505000333555505557F777FF755557F55000000355557 07557777777F55557F5555000005555707555577777FF5557F55553000075557 0755557F7777FFF57555553350000055555555775777775555550000} NumGlyphs = 2 OnClick = btnDestinationClick end object edSource: TEdit Left = 80 Top = 152 Width = 145 Height = 20 TabStop = False Enabled = False ReadOnly = True TabOrder = 0 end object Memo1: TMemo Left = 80 Top = 8 Width = 145 Height = 137 Lines.Strings = ( 'Memo1') TabOrder = 1 end object edDestination: TEdit Left = 80 Top = 184 Width = 145 Height = 20 TabStop = False Enabled = False TabOrder = 2 end end object lbFileGroups: TListBox Left = 0 Top = 0 Width = 136 Height = 209 Align = alClient ExtendedSelect = False ItemHeight = 13 TabOrder = 2 OnClick = lbFileGroupsClick end end