object SaveDlg: TSaveDlg Left = 885 Top = 472 ActiveControl = OKBtn BorderStyle = bsDialog ClientHeight = 319 ClientWidth = 329 Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] PixelsPerInch = 96 Position = poScreenCenter Scaled = False OnActivate = FormActivate TextHeight = 13 object OKBtn: TBitBtn Left = 84 Top = 284 Width = 77 Height = 27 Caption = 'OK' Default = True ModalResult = 1 TabOrder = 0 Glyph.Data = { DE010000424DDE01000000000000760000002800000024000000120000000100 0400000000006801000000000000000000001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 3333333333333333333333330000333333333333333333333333F33333333333 00003333344333333333333333388F3333333333000033334224333333333333 338338F3333333330000333422224333333333333833338F3333333300003342 222224333333333383333338F3333333000034222A22224333333338F338F333 8F33333300003222A3A2224333333338F3838F338F33333300003A2A333A2224 33333338F83338F338F33333000033A33333A222433333338333338F338F3333 0000333333333A222433333333333338F338F33300003333333333A222433333 333333338F338F33000033333333333A222433333333333338F338F300003333 33333333A222433333333333338F338F00003333333333333A22433333333333 3338F38F000033333333333333A223333333333333338F830000333333333333 333A333333333333333338330000333333333333333333333333333333333333 0000} NumGlyphs = 2 Spacing = -1 IsControl = True end object CancelBtn: TBitBtn Left = 168 Top = 284 Width = 77 Height = 27 Cancel = True ModalResult = 2 TabOrder = 1 Glyph.Data = { DE010000424DDE01000000000000760000002800000024000000120000000100 0400000000006801000000000000000000001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 333333333333333333333333000033338833333333333333333F333333333333 0000333911833333983333333388F333333F3333000033391118333911833333 38F38F333F88F33300003339111183911118333338F338F3F8338F3300003333 911118111118333338F3338F833338F3000033333911111111833333338F3338 3333F8330000333333911111183333333338F333333F83330000333333311111 8333333333338F3333383333000033333339111183333333333338F333833333 00003333339111118333333333333833338F3333000033333911181118333333 33338333338F333300003333911183911183333333383338F338F33300003333 9118333911183333338F33838F338F33000033333913333391113333338FF833 38F338F300003333333333333919333333388333338FFF830000333333333333 3333333333333333333888330000333333333333333333333333333333333333 0000} NumGlyphs = 2 Spacing = -1 IsControl = True end object GroupBox1: TGroupBox Left = 8 Top = 4 Width = 313 Height = 229 TabOrder = 2 object Label1: TLabel Left = 8 Top = 52 Width = 137 Height = 13 AutoSize = False Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Label2: TLabel Left = 160 Top = 12 Width = 141 Height = 13 AutoSize = False Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Label3: TLabel Left = 160 Top = 186 Width = 141 Height = 13 AutoSize = False Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Label4: TLabel Left = 8 Top = 12 Width = 145 Height = 13 AutoSize = False Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object FileListBox: TFileListBox Left = 8 Top = 68 Width = 145 Height = 153 FileEdit = FileEdit ItemHeight = 13 Mask = '*.crf' TabOrder = 1 OnDblClick = FileListBoxDblClick end object DirectoryListBox: TDirectoryListBox Left = 160 Top = 28 Width = 145 Height = 153 FileList = FileListBox ItemHeight = 16 TabOrder = 2 end object DriveComboBox: TDriveComboBox Left = 160 Top = 202 Width = 145 Height = 19 DirList = DirectoryListBox TabOrder = 3 end object FileEdit: TEdit Left = 8 Top = 28 Width = 145 Height = 21 TabOrder = 0 Text = '*.crf' end end object GroupBox2: TGroupBox Left = 8 Top = 236 Width = 313 Height = 41 TabOrder = 3 object Label8: TLabel Left = 12 Top = 16 Width = 145 Height = 13 AutoSize = False Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object newpathbtn: TSpeedButton Left = 280 Top = 12 Width = 25 Height = 21 Hint = 'Neues Verzeichnis anlegen' Glyph.Data = { 90010000424D9001000000000000760000002800000020000000100000000100 0400000000000001000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00EEEEEEEEEEEE EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE EEEEEEEEEEEEEEEEEEEEEEE0000000000EEEEEEFFFFFFFFFFEEEEE0BFBFBFBFB 0EEEEE8EEEEEEEEEFEEEEE0FBFBFBFBF0EEEEE8EEEEEEEEEFEEEEE0BFBFBFBFB 0EEEEE8EEEEEEEEEFEEEEE0FBFBFB9BF9EE9EE8EEEEEE8EE8EE8EE0BFBFBFB9B 9E9EEE8EEEEEEE8E8E8EEE0FBFBFBFB999EEEE8EEEEEEEE888EEEE0000000999 9999EE88888888888888EEE0FBFB0EE999EEEEE8EFFF8EE888EEEEE800008E9E 9E9EEEEE8888EE8E8E8EEEEEEEEEE9EE9EE9EEEEEEEEE8EE8EE8EEEEEEEEEEEE EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE000000000000 0000000000000000000000000000000000000000} NumGlyphs = 2 ParentShowHint = False ShowHint = True OnClick = newpathbtnClick end object pathedit: TEdit Left = 160 Top = 13 Width = 113 Height = 21 MaxLength = 8 TabOrder = 0 Text = 'pathedit' end end end