object OuvrirDlg: TOuvrirDlg Left = 266 Top = 139 Hint = 'choisir un fichier D�clic.' HelpContext = 102 ActiveControl = OKBtn BorderStyle = bsDialog Caption = 'Ouvrir une figure' ClientHeight = 217 ClientWidth = 512 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] Position = poScreenCenter OnCloseQuery = FormCloseQuery OnCreate = FormCreate OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object Panel1: TPanel Left = 6 Top = 6 Width = 325 Height = 169 TabOrder = 0 object FileListBox: TFileListBox Left = 12 Top = 38 Width = 145 Height = 95 Hint = 'liste des fichiers' ExtendedSelect = False FileEdit = FileEdit FileType = [ftArchive, ftNormal] ItemHeight = 13 Mask = '*.fdc' TabOrder = 0 OnClick = FileListBoxClick OnDblClick = FileListBoxDblClick end object FilterComboBox: TFilterComboBox Left = 12 Top = 139 Width = 145 Height = 21 Hint = 'filtres de fichiers.' FileList = FileListBox Filter = 'Figures D�clic (*.fdc)|*.fdc|Backups Figures (*.anc)|*.anc|Tous ' + 'les fichiers (*.*)|*.*' TabOrder = 1 end object DirectoryListBox: TDirectoryListBox Left = 166 Top = 38 Width = 145 Height = 95 Hint = 'liste des r�pertoires.' FileList = FileListBox ItemHeight = 16 TabOrder = 2 end object DriveComboBox: TDriveComboBox Left = 167 Top = 140 Width = 145 Height = 19 Hint = 'liste des lecteurs.' DirList = DirectoryListBox TabOrder = 3 end object FileEdit: TEdit Left = 12 Top = 10 Width = 298 Height = 21 Hint = 'nom du fichier.' TabOrder = 4 Text = '*.fdc' OnKeyPress = FileEditKeyPress end end object Panel2: TPanel Left = 6 Top = 175 Width = 325 Height = 35 BorderWidth = 3 TabOrder = 1 object Memo: TMemo Left = 4 Top = 4 Width = 317 Height = 27 Hint = 'titre de la figure.' Align = alClient BorderStyle = bsNone Ctl3D = True MaxLength = 255 ParentCtl3D = False ReadOnly = True TabOrder = 0 OnChange = MemoChange end end object Panel3: TPanel Left = 331 Top = 137 Width = 174 Height = 73 Hint = 'validation des choix.' TabOrder = 2 object Bevel1: TBevel Left = 15 Top = 22 Width = 143 Height = 29 end object CancelBtn: TBitBtn Left = 16 Top = 23 Width = 71 Height = 27 TabOrder = 0 Kind = bkCancel Margin = 2 Style = bsNew Spacing = -1 IsControl = True end object OKBtn: TBitBtn Left = 86 Top = 23 Width = 71 Height = 27 TabOrder = 1 Kind = bkOK Margin = 2 Style = bsNew Spacing = -1 IsControl = True end end object Panel4: TPanel Left = 331 Top = 6 Width = 174 Height = 131 BevelInner = bvLowered BorderWidth = 2 TabOrder = 3 object Image: TImage Left = 4 Top = 4 Width = 166 Height = 123 Hint = 'image associ�e au fichier' Align = alClient Stretch = True end end end