home *** CD-ROM | disk | FTP | other *** search
- object decoupe: Tdecoupe
- Left = 113
- Top = 89
- ActiveControl = OKBtn
- BorderIcons = [biSystemMenu]
- BorderStyle = bsDialog
- Caption = 'D�coupe de l'#39'image'
- ClientHeight = 453
- ClientWidth = 627
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- OldCreateOrder = True
- Position = poScreenCenter
- OnActivate = FormActivate
- OnMouseMove = FormMouseMove
- PixelsPerInch = 96
- TextHeight = 13
- object Label1: TLabel
- Left = 584
- Top = 416
- Width = 32
- Height = 13
- Caption = 'Label1'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object Label2: TLabel
- Left = 584
- Top = 432
- Width = 32
- Height = 13
- Caption = 'Label2'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object OKBtn: TBitBtn
- Left = 24
- Top = 420
- Width = 77
- Height = 27
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 0
- Kind = bkOK
- Margin = 2
- Spacing = -1
- IsControl = True
- end
- object CancelBtn: TBitBtn
- Left = 108
- Top = 420
- Width = 77
- Height = 27
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 1
- Kind = bkCancel
- Margin = 2
- Spacing = -1
- IsControl = True
- end
- object HelpBtn: TBitBtn
- Left = 192
- Top = 420
- Width = 77
- Height = 27
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 2
- OnClick = HelpBtnClick
- Kind = bkHelp
- Margin = 2
- Spacing = -1
- IsControl = True
- end
- object ScrollBox1: TScrollBox
- Left = 8
- Top = 8
- Width = 609
- Height = 393
- TabOrder = 7
- object Image1: TImage
- Left = 0
- Top = 0
- Width = 615
- Height = 399
- AutoSize = True
- OnMouseDown = Image1MouseDown
- OnMouseMove = Image1MouseMove
- end
- end
- object BitBtn1: TBitBtn
- Left = 288
- Top = 420
- Width = 65
- Height = 25
- Caption = 'Rectangle'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 3
- OnClick = BitBtn1Click
- end
- object BitBtn2: TBitBtn
- Left = 360
- Top = 420
- Width = 57
- Height = 25
- Caption = 'Cercle'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 4
- OnClick = BitBtn2Click
- end
- object BitBtn3: TBitBtn
- Left = 424
- Top = 420
- Width = 57
- Height = 25
- Caption = 'Polygone'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 5
- OnClick = BitBtn3Click
- end
- object BitBtn4: TBitBtn
- Left = 488
- Top = 420
- Width = 89
- Height = 25
- Caption = 'Stop Polygone'
- Enabled = False
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 6
- OnClick = BitBtn4Click
- end
- object OpenDialog1: TOpenDialog
- Filter = 'Fichiers HTML (*.htm;*.html)|*.htm*|Tous les fichiers (*.*|*.*'
- Top = 416
- end
- end
-