home *** CD-ROM | disk | FTP | other *** search
- object ImprForm: TImprForm
- Left = 291
- Top = 171
- BorderStyle = bsDialog
- Caption = 'Imprimer'
- ClientHeight = 393
- ClientWidth = 490
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- KeyPreview = True
- OldCreateOrder = True
- Position = poMainFormCenter
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- OnHide = FormHide
- OnKeyPress = FormKeyPress
- OnPaint = FormPaint
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object LabelZoom: TLabel
- Left = 262
- Top = 77
- Width = 35
- Height = 13
- Caption = 'Echelle'
- end
- object LCopies: TLabel
- Left = 16
- Top = 296
- Width = 38
- Height = 13
- Caption = 'Copies :'
- end
- object LblResolution: TLabel
- Left = 262
- Top = 120
- Width = 50
- Height = 13
- Caption = 'R'#233'solution'
- end
- object LblProp: TLabel
- Left = 16
- Top = 192
- Width = 36
- Height = 13
- Caption = 'LblProp'
- end
- object CBCentrer: TCheckBox
- Left = 262
- Top = 16
- Width = 193
- Height = 17
- Caption = 'Centrer dans la page'
- TabOrder = 0
- OnClick = CBCentrerClick
- end
- object CBAjuster: TCheckBox
- Left = 262
- Top = 32
- Width = 193
- Height = 17
- Caption = 'Utiliser toute la page'
- TabOrder = 1
- OnClick = CBAjusterClick
- end
- object ScrollBarZoom: TScrollBar
- Left = 263
- Top = 94
- Width = 209
- Height = 15
- LargeChange = 4
- Min = 1
- PageSize = 0
- Position = 10
- TabOrder = 3
- OnScroll = ScrollBarZoomScroll
- end
- object GBTaille: TGroupBox
- Left = 262
- Top = 144
- Width = 211
- Height = 68
- Caption = ' Taille de l'#39'image '
- TabOrder = 4
- object Label1: TLabel
- Left = 10
- Top = 20
- Width = 42
- Height = 13
- Caption = 'Largeur :'
- end
- object Label2: TLabel
- Left = 80
- Top = 20
- Width = 44
- Height = 13
- Caption = 'Hauteur :'
- end
- object SEL: TFloatSpinEdit
- Left = 10
- Top = 35
- Width = 65
- Height = 21
- Format = '0.00'
- Increment = 1.000000000000000000
- MaxLength = 5
- MaxValue = 1000.000000000000000000
- ShowUpDown = True
- TabOrder = 0
- OnChange = SELChange
- end
- object SEH: TFloatSpinEdit
- Left = 80
- Top = 35
- Width = 65
- Height = 21
- Format = '0.00'
- Increment = 1.000000000000000000
- MaxLength = 5
- MaxValue = 1000.000000000000000000
- ShowUpDown = True
- TabOrder = 1
- OnChange = SEHChange
- end
- object BOkTaille: TButton
- Left = 152
- Top = 34
- Width = 47
- Height = 22
- Caption = 'Ok'
- TabOrder = 2
- OnClick = BOkTailleClick
- end
- end
- object GBMarges: TGroupBox
- Left = 262
- Top = 218
- Width = 211
- Height = 68
- Caption = ' Position '
- TabOrder = 5
- object Label3: TLabel
- Left = 10
- Top = 20
- Width = 44
- Height = 13
- Caption = 'Gauche :'
- end
- object Label4: TLabel
- Left = 80
- Top = 20
- Width = 29
- Height = 13
- Caption = 'Haut :'
- end
- object SEX: TFloatSpinEdit
- Left = 10
- Top = 35
- Width = 65
- Height = 21
- Format = '0.00'
- Increment = 1.000000000000000000
- MaxLength = 5
- MaxValue = 1000.000000000000000000
- ShowUpDown = True
- TabOrder = 0
- OnChange = SEXYChange
- end
- object SEY: TFloatSpinEdit
- Left = 80
- Top = 35
- Width = 65
- Height = 21
- Format = '0.00'
- Increment = 1.000000000000000000
- MaxLength = 5
- MaxValue = 1000.000000000000000000
- ShowUpDown = True
- TabOrder = 1
- OnChange = SEXYChange
- end
- object BOkMarges: TButton
- Left = 152
- Top = 34
- Width = 47
- Height = 22
- Caption = 'Ok'
- TabOrder = 2
- OnClick = BOkMargesClick
- end
- end
- object CBContours: TCheckBox
- Left = 262
- Top = 298
- Width = 219
- Height = 17
- Caption = 'Imprimer uniquement le contour'
- TabOrder = 7
- end
- object CBTraits: TCheckBox
- Left = 262
- Top = 314
- Width = 209
- Height = 17
- Caption = 'Imprimer les traits de coupe'
- TabOrder = 8
- end
- object BConfigurer: TButton
- Left = 16
- Top = 352
- Width = 89
- Height = 25
- Caption = 'Configurer...'
- TabOrder = 9
- OnClick = BConfigurerClick
- end
- object BImprimer: TButton
- Left = 262
- Top = 352
- Width = 89
- Height = 25
- Caption = 'Imprimer'
- TabOrder = 10
- OnClick = BImprimerClick
- end
- object BAnnuler: TButton
- Left = 385
- Top = 352
- Width = 89
- Height = 25
- Cancel = True
- Caption = 'Annuler'
- ModalResult = 2
- TabOrder = 11
- end
- object SECopies: TSpinEdit2
- Left = 16
- Top = 312
- Width = 65
- Height = 21
- MaxValue = 100
- MinValue = 1
- ShowUpDown = True
- TabOrder = 6
- Value = 1
- end
- object CBTailleReelle: TCheckBox
- Left = 262
- Top = 48
- Width = 185
- Height = 17
- Caption = 'Taille r'#233'elle'
- TabOrder = 2
- OnClick = CBTailleReelleClick
- end
- object PrinterSetupDialog: TPrinterSetupDialog
- Left = 168
- Top = 352
- end
- end
-