home *** CD-ROM | disk | FTP | other *** search
- object TrapezeForm: TTrapezeForm
- Left = 291
- Top = 166
- ActiveControl = BOk
- BorderStyle = bsDialog
- Caption = 'Trap'#232'ze / Perspective'
- ClientHeight = 240
- ClientWidth = 315
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- FormStyle = fsStayOnTop
- OldCreateOrder = False
- Position = poMainFormCenter
- OnCreate = FormCreate
- OnHide = FormHide
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object Lbl1: TLabel
- Left = 16
- Top = 72
- Width = 23
- Height = 13
- Caption = 'Haut'
- end
- object Lbl2: TLabel
- Left = 16
- Top = 120
- Width = 18
- Height = 13
- Caption = 'Bas'
- end
- object Label2: TLabel
- Left = 16
- Top = 16
- Width = 30
- Height = 13
- Caption = 'Fond :'
- end
- object TB1: TTrackBar
- Left = 8
- Top = 88
- Width = 297
- Height = 25
- Max = 200
- Min = 10
- Orientation = trHorizontal
- PageSize = 3
- Frequency = 10
- Position = 100
- SelEnd = 0
- SelStart = 0
- TabOrder = 0
- ThumbLength = 15
- TickMarks = tmBottomRight
- TickStyle = tsAuto
- OnChange = TB1Change
- end
- object TB2: TTrackBar
- Left = 8
- Top = 136
- Width = 297
- Height = 25
- Max = 200
- Min = 10
- Orientation = trHorizontal
- PageSize = 3
- Frequency = 10
- Position = 100
- SelEnd = 0
- SelStart = 0
- TabOrder = 1
- ThumbLength = 15
- TickMarks = tmBottomRight
- TickStyle = tsAuto
- OnChange = TB2Change
- end
- object BAnnuler: TButton
- Left = 224
- Top = 200
- Width = 75
- Height = 25
- Cancel = True
- Caption = 'Annuler'
- TabOrder = 2
- OnClick = BAnnulerClick
- end
- object BOk: TButton
- Left = 144
- Top = 200
- Width = 75
- Height = 25
- Caption = 'Ok'
- Default = True
- TabOrder = 3
- OnClick = BOkClick
- end
- object BApercu: TButton
- Left = 16
- Top = 200
- Width = 75
- Height = 25
- Caption = 'Aper'#231'u'
- TabOrder = 4
- OnClick = BApercuClick
- end
- object RBHorz: TRadioButton
- Left = 144
- Top = 24
- Width = 153
- Height = 17
- Caption = 'Axe horizontal'
- Checked = True
- TabOrder = 5
- TabStop = True
- OnClick = RBClick
- end
- object RBVert: TRadioButton
- Left = 144
- Top = 40
- Width = 153
- Height = 17
- Caption = 'Axe vertical'
- TabOrder = 6
- OnClick = RBClick
- end
- object ColorEdit: TColorEdit
- Left = 16
- Top = 32
- Width = 89
- Height = 21
- BorderStyle = bsSingle
- Color = clWhite
- CustomText = 'Autres couleurs...'
- ColorDialog = MainForm.GlobalColorDialog
- ReadOnly = False
- OnChange = ColorEditChange
- end
- end
-