object RedimForm: TRedimForm
  Left = 307
  Top = 164
  ActiveControl = BOk
  BorderStyle = bsDialog
  Caption = 'Taille de l'#39'image'
  ClientHeight = 381
  ClientWidth = 313
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsStayOnTop
  KeyPreview = True
  OldCreateOrder = False
  Position = poMainFormCenter
  OnCreate = FormCreate
  OnKeyPress = FormKeyPress
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object BAnnuler: TButton
    Left = 222
    Top = 340
    Width = 75
    Height = 25
    Caption = 'Annuler'
    ModalResult = 2
    TabOrder = 0
  end
  object BOk: TButton
    Left = 136
    Top = 340
    Width = 75
    Height = 25
    Caption = 'Ok'
    TabOrder = 1
    OnClick = BOkClick
  end
  object GBOld: TGroupBox
    Left = 16
    Top = 16
    Width = 281
    Height = 78
    Caption = ' Taille en pixels / M'#233'moire '
    Enabled = False
    TabOrder = 2
    object Label3: TLabel
      Left = 16
      Top = 24
      Width = 42
      Height = 13
      Caption = 'Largeur :'
    end
    object Label4: TLabel
      Left = 104
      Top = 24
      Width = 44
      Height = 13
      Caption = 'Hauteur :'
    end
    object Label5: TLabel
      Left = 192
      Top = 24
      Width = 46
      Height = 13
      Caption = 'M'#233'moire :'
    end
    object EdiLargeur: TEdit
      Left = 16
      Top = 40
      Width = 73
      Height = 21
      ParentColor = True
      ReadOnly = True
      TabOrder = 0
    end
    object EdiHauteur: TEdit
      Left = 104
      Top = 40
      Width = 73
      Height = 21
      ParentColor = True
      ReadOnly = True
      TabOrder = 1
    end
    object EdiMem: TEdit
      Left = 192
      Top = 40
      Width = 73
      Height = 21
      ParentColor = True
      ReadOnly = True
      TabOrder = 2
    end
  end
  object GroupBox1: TGroupBox
    Left = 16
    Top = 102
    Width = 281
    Height = 227
    Caption = ' Nouvelle taille '
    TabOrder = 3
    object Label1: TLabel
      Left = 16
      Top = 24
      Width = 42
      Height = 13
      Caption = 'Largeur :'
    end
    object Label2: TLabel
      Left = 16
      Top = 72
      Width = 44
      Height = 13
      Caption = 'Hauteur :'
    end
    object Image1: TImage
      Left = 110
      Top = 48
      Width = 16
      Height = 55
      AutoSize = True
      Picture.Data = {<image000.bmp>}
      Transparent = True
    end
    object LblRes: TLabel
      Left = 16
      Top = 120
      Width = 56
      Height = 13
      Caption = 'R'#233'solution :'
    end
    object EdiL: TFloatSpinEdit
      Left = 16
      Top = 40
      Width = 89
      Height = 21
      Format = '0'
      Increment = 1.000000000000000000
      MaxLength = 7
      MaxValue = 10000.000000000000000000
      ShowUpDown = True
      TabOrder = 0
      Value = 1.000000000000000000
      OnChange = EdiLChange
    end
    object EdiH: TFloatSpinEdit
      Left = 16
      Top = 88
      Width = 89
      Height = 21
      Format = '0'
      Increment = 1.000000000000000000
      MaxLength = 7
      MaxValue = 10000.000000000000000000
      ShowUpDown = True
      TabOrder = 1
      Value = 1.000000000000000000
      OnChange = EdiHChange
    end
    object CmbUnit: TComboBox
      Left = 131
      Top = 65
      Width = 94
      Height = 21
      Style = csDropDownList
      ItemHeight = 13
      ItemIndex = 0
      TabOrder = 2
      Text = 'pixels'
      OnChange = CmbUnitChange
      Items.Strings = (
        'pixels'
        '%'
        'cm'
        'pouces')
    end
    object CBProportions: TCheckBox
      Left = 16
      Top = 176
      Width = 193
      Height = 17
      Caption = 'Conserver les proportions'
      Checked = True
      State = cbChecked
      TabOrder = 3
    end
    object CBOptimiser: TCheckBox
      Left = 16
      Top = 196
      Width = 177
      Height = 17
      Caption = 'Optimiser'
      Checked = True
      State = cbChecked
      TabOrder = 4
    end
    object EdiRes: TFloatSpinEdit
      Left = 16
      Top = 136
      Width = 89
      Height = 21
      Format = '0.00'
      Increment = 1.000000000000000000
      MaxLength = 7
      MaxValue = 20000.000000000000000000
      MinValue = 10.000000000000000000
      ShowUpDown = True
      TabOrder = 5
      Value = 72.000000000000000000
      OnChange = EdiResChange
    end
    object CmbRes: TComboBox
      Left = 112
      Top = 136
      Width = 113
      Height = 21
      Style = csDropDownList
      ItemHeight = 13
      ItemIndex = 0
      TabOrder = 6
      Text = 'pixels/pouces'
      OnChange = CmbResChange
      Items.Strings = (
        'pixels/pouces'
        'pixels/cm')
    end
  end
end