GLScene/Externals/Graphics32/Examples/Drawing/Clipper/MainUnit.dfm

object FrmClipper: TFrmClipper
  Left = 280
  Top = 166
  Caption = 'Clipper'
  ClientHeight = 470
  ClientWidth = 710
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = 'Arial'
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  OnKeyDown = FormKeyDown
  PixelsPerInch = 96
  TextHeight = 15
  object PnlControl: TPanel
    Left = 0
    Top = 0
    Width = 173
    Height = 470
    Align = alLeft
    TabOrder = 0
    ExplicitHeight = 508
    object BtnExit: TButton
      Left = 16
      Top = 420
      Width = 138
      Height = 25
      Cancel = True
      Caption = 'Exit'
      TabOrder = 5
      OnClick = BtnExitClick
    end
    object rgClipping: TRadioGroup
      Left = 16
      Top = 26
      Width = 138
      Height = 127
      Caption = 'Clipping Op'
      ItemIndex = 1
      Items.Strings = (
        '&Intersection'
        '&Union'
        '&Difference'
        '&XOR')
      TabOrder = 0
    end
    object BtnClear: TButton
      Left = 16
      Top = 384
      Width = 138
      Height = 25
      Caption = '&Clear'
      TabOrder = 4
      OnClick = BtnClearClick
    end
    object RgpObject: TRadioGroup
      Left = 16
      Top = 176
      Width = 138
      Height = 98
      Caption = 'Shape'
      ItemIndex = 0
      Items.Strings = (
        '&Star'
        '&Ellipse'
        '&Rectangle')
      TabOrder = 1
    end
    object BtnInflate: TButton
      Left = 16
      Top = 296
      Width = 138
      Height = 25
      Caption = 'In&flate'
      TabOrder = 2
      OnClick = BtnInflateClick
    end
    object BtnDeflate: TButton
      Left = 16
      Top = 330
      Width = 138
      Height = 25
      Caption = 'Defla&te'
      TabOrder = 3
      OnClick = BtnDeflateClick
    end
  end
  object ImgView32: TImgView32
    Left = 173
    Top = 0
    Width = 537
    Height = 470
    Align = alClient
    AutoSize = True
    Bitmap.ResamplerClassName = 'TNearestResampler'
    BitmapAlign = baCenter
    Scale = 1.000000000000000000
    ScaleMode = smScale
    ScrollBars.ShowHandleGrip = True
    ScrollBars.Style = rbsDefault
    ScrollBars.Size = 16
    ScrollBars.Visibility = svHidden
    SizeGrip = sgAlways
    OverSize = 0
    TabOrder = 1
    OnMouseDown = ImgView32MouseDown
    OnMouseLeave = ImgView32MouseLeave
    OnMouseMove = ImgView32MouseMove
    ExplicitLeft = 169
    ExplicitWidth = 665
    ExplicitHeight = 508
  end
end