Freelog 1/Freelog001.iso/Logs/Educatif/Declic/Declic32.exe/0/RCDATA/TGEREDLG/TGEREDLG.txt

Text File | 1998-12-20 | 5KB | 215 lines

object GereDlg: TGereDlg
  Left = 150
  Top = 75
  BorderStyle = bsDialog
  Caption = 'gestion des fichiers'
  ClientHeight = 263
  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 = 7
    Top = 11
    Width = 325
    Height = 169
    TabOrder = 0
    object FileListBox: TFileListBox
      Left = 12
      Top = 33
      Width = 145
      Height = 95
      Hint = 'liste des fichiers'
      FileEdit = FileEdit
      ItemHeight = 13
      Mask = '*.fdc'
      TabOrder = 0
    end
    object FilterComboBox: TFilterComboBox
      Left = 12
      Top = 139
      Width = 145
      Height = 21
      Hint = 'filtres de fichiers.'
      FileList = FileListBox
      Filter =
        'figures FDC|*.fdc|macros FMC|*.fmc|Scriptes SCP|*.scp|Textes TXT' +
        '|*.txt|images WMF|*.wmf|images BMP|*.bmp|backups |*.anc;*.bmc;*.' +
        'bcp;*.bwm;*.bbm|toutes les images|*.wmf;*.bmp|tous les fichiers|' +
        '*.*'
      TabOrder = 1
    end
    object DirectoryListBox: TDirectoryListBox
      Left = 167
      Top = 34
      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 = 300
      Height = 21
      Hint = 'nom du fichier.'
      TabOrder = 4
      Text = '*.fdc'
      OnChange = FileEditChange
      OnKeyPress = FileEditKeyPress
    end
  end
  object Panel2: TPanel
    Left = 7
    Top = 180
    Width = 325
    Height = 73
    BorderWidth = 3
    TabOrder = 1
    object Memo: TMemo
      Left = 4
      Top = 4
      Width = 317
      Height = 65
      Hint = 'titre de la figure ou du fichier.'
      Align = alClient
      BorderStyle = bsNone
      Ctl3D = True
      MaxLength = 255
      ParentCtl3D = False
      ReadOnly = True
      TabOrder = 0
      OnChange = MemoChange
    end
  end
  object Panel3: TPanel
    Left = 332
    Top = 180
    Width = 174
    Height = 73
    TabOrder = 2
    object Bevel1: TBevel
      Left = 16
      Top = 40
      Width = 143
      Height = 29
    end
    object Bevel2: TBevel
      Left = 16
      Top = 6
      Width = 143
      Height = 29
    end
    object CancelBtn: TBitBtn
      Left = 17
      Top = 41
      Width = 141
      Height = 27
      Hint = 'revenir � D�clcic.'
      Cancel = True
      Caption = 'Quitter'
      ModalResult = 2
      TabOrder = 0
      Style = bsNew
      Spacing = -1
      IsControl = True
    end
    object EffacerBtn: TBitBtn
      Left = 17
      Top = 7
      Width = 71
      Height = 27
      Hint = 'effacer le fichier du disque.'
      Caption = 'Effacer'
      TabOrder = 1
      OnClick = EffacerBtnClick
      Style = bsNew
    end
    object NomBtn: TBitBtn
      Left = 87
      Top = 7
      Width = 71
      Height = 27
      Hint = 'changer le nom du fichier sur disque.'
      Caption = 'Nom'
      TabOrder = 2
      OnClick = NomBtnClick
      Style = bsNew
    end
  end
  object Panel4: TPanel
    Left = 332
    Top = 11
    Width = 174
    Height = 169
    BevelOuter = bvNone
    TabOrder = 3
    object Panel5: TPanel
      Left = 0
      Top = 0
      Width = 174
      Height = 132
      BevelInner = bvLowered
      BorderWidth = 2
      TabOrder = 0
      object Image: TImage
        Left = 4
        Top = 4
        Width = 166
        Height = 124
        Hint = 'm�daillon associ� � la figure ou image.'
        Align = alClient
        Center = True
        Stretch = True
      end
    end
    object Panel6: TPanel
      Left = 0
      Top = 128
      Width = 174
      Height = 41
      TabOrder = 1
      object CheckVisualiser: TCheckBox
        Left = 17
        Top = 12
        Width = 75
        Height = 17
        Hint = 'Affiche s'#39'il s'#39'agit d'#39'une image'
        Caption = 'Visualiser'
        State = cbChecked
        TabOrder = 0
        OnClick = CheckVisualiserClick
      end
      object CheckTaille: TCheckBox
        Left = 103
        Top = 11
        Width = 52
        Height = 17
        Hint = 'Agrandir une image petite.'
        Caption = 'Taille'
        TabOrder = 1
        OnClick = CheckTailleClick
      end
    end
  end
end