object NewForm: TNewForm
  Left = 237
  Top = 173
  ActiveControl = BOk
  BorderStyle = bsDialog
  Caption = 'Nouveau'
  ClientHeight = 446
  ClientWidth = 314
  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 = 406
    Width = 75
    Height = 25
    Caption = 'Annuler'
    ModalResult = 2
    TabOrder = 0
  end
  object BOk: TButton
    Left = 136
    Top = 406
    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 Label5: TLabel
      Left = 16
      Top = 24
      Width = 42
      Height = 13
      Caption = 'Largeur :'
    end
    object Label6: TLabel
      Left = 104
      Top = 24
      Width = 44
      Height = 13
      Caption = 'Hauteur :'
    end
    object Label7: 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 = 291
    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 Label3: TLabel
      Left = 16
      Top = 184
      Width = 30
      Height = 13
      Caption = 'Fond :'
    end
    object SBMotif: TSpeedButton
      Left = 243
      Top = 200
      Width = 23
      Height = 21
      Flat = True
      OnClick = SBMotifClick
    end
    object Label4: TLabel
      Left = 16
      Top = 236
      Width = 80
      Height = 13
      Caption = 'Taille pr'#233'd'#233'finie :'
    end
    object EdiL: TFloatSpinEdit
      Left = 16
      Top = 40
      Width = 89
      Height = 21
      Format = '0'
      Increment = 1
      MaxLength = 7
      MaxValue = 10000
      ShowUpDown = True
      TabOrder = 0
      Value = 800
      OnChange = EdiLChange
    end
    object EdiH: TFloatSpinEdit
      Left = 16
      Top = 88
      Width = 89
      Height = 21
      Format = '0'
      Increment = 1
      MaxLength = 7
      MaxValue = 10000
      ShowUpDown = True
      TabOrder = 1
      Value = 600
      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 EdiRes: TFloatSpinEdit
      Left = 16
      Top = 136
      Width = 89
      Height = 21
      Format = '0.00'
      Increment = 1
      MaxLength = 7
      MaxValue = 20000
      MinValue = 10
      ShowUpDown = True
      TabOrder = 3
      Value = 72
      OnChange = EdiResChange
    end
    object CmbRes: TComboBox
      Left = 112
      Top = 136
      Width = 113
      Height = 21
      Style = csDropDownList
      ItemHeight = 13
      ItemIndex = 0
      TabOrder = 4
      Text = 'pixels/pouces'
      OnChange = CmbResChange
      Items.Strings = (
        'pixels/pouces'
        'pixels/cm')
    end
    object ColorEdit: TColorEdit
      Left = 16
      Top = 200
      Width = 73
      Height = 21
      BorderStyle = bsSingle
      Color = clWhite
      CustomText = 'Autres couleurs...'
      ColorDialog = MainForm.GlobalColorDialog
      ReadOnly = False
    end
    object CBMotif: TCheckBox
      Left = 104
      Top = 180
      Width = 137
      Height = 17
      Caption = 'Motif de fond :'
      TabOrder = 6
      OnClick = CBMotifClick
    end
    object EdiMotif: TSpecialEdit
      Left = 104
      Top = 200
      Width = 137
      Height = 21
      BorderStyle = bsSingle
      ButtonStyle = stDown
      DisabledColor = clBtnFace
      ItemIndex = -1
      MinimizeText = True
      NumGlyphs = 1
      ParentColor = False
      ReadOnly = False
      ShowButton = False
      OnClick = SBMotifClick
    end
    object LstTaille: TSpecialEdit
      Left = 15
      Top = 252
      Width = 226
      Height = 21
      BorderStyle = bsSingle
      ButtonStyle = stDown
      DisabledColor = clNone
      DropDownMenu = PopTaille
      ItemIndex = 0
      MinimizeText = False
      NumGlyphs = 1
      ParentColor = False
      ReadOnly = False
      ShowButton = True
      Text = '<Personnalis'#233'>'
      OnChange = LstTailleChange
    end
  end
  object PopTaille: TPopupMenu
    Left = 160
    Top = 344
    object Personnalis1: TMenuItem
      Caption = '<Personnalis'#233'>'
      Checked = True
    end
    object N1: TMenuItem
      Caption = '-'
    end
    object N100x1001: TMenuItem
      Caption = '100 x 100'
    end
    object N640x4801: TMenuItem
      Caption = '640 x 480'
    end
    object N800x6001: TMenuItem
      Caption = '800 x 600'
    end
    object N1024x7681: TMenuItem
      Caption = '1024 x 768'
    end
    object N1280x10241: TMenuItem
      Caption = '1280 x 1024'
    end
    object N1600x12001: TMenuItem
      Caption = '1600 x 1200'
    end
    object N2: TMenuItem
      Caption = '-'
    end
    object A4portrait1: TMenuItem
      Caption = 'A4 - Portrait'
    end
    object A4Paysage1: TMenuItem
      Caption = 'A4 - Paysage'
    end
    object B5Portrait1: TMenuItem
      Caption = 'B5 - Portrait'
    end
    object B5Paysage1: TMenuItem
      Caption = 'B5 - Paysage'
    end
    object N3: TMenuItem
      Caption = '-'
    end
    object Cartepostale1: TMenuItem
      Caption = 'Carte postale'
    end
    object PochetteCDface1: TMenuItem
      Caption = 'Pochette CD - Face'
    end
    object PchetteCDDos1: TMenuItem
      Caption = 'Pochette CD - Dos'
    end
    object PochetteDVD1: TMenuItem
      Caption = 'Pochette DVD'
    end
  end
end