uPrincipal.~dfm

object TFormPrincipal: TTFormPrincipal
  Left = 272
  Top = 10
  Width = 951
  Height = 743
  Caption = '1'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 560
    Top = 16
    Width = 32
    Height = 13
    Caption = 'Label1'
  end
  object Label2: TLabel
    Left = 560
    Top = 40
    Width = 32
    Height = 13
    Caption = 'Label2'
  end
  object Label3: TLabel
    Left = 24
    Top = 528
    Width = 7
    Height = 13
    Caption = 'X'
  end
  object Label4: TLabel
    Left = 24
    Top = 560
    Width = 7
    Height = 13
    Caption = 'Y'
  end
  object Label5: TLabel
    Left = 128
    Top = 532
    Width = 28
    Height = 13
    Caption = 'Graus'
  end
  object Label6: TLabel
    Left = 128
    Top = 560
    Width = 22
    Height = 13
    Caption = 'Raio'
  end
  object Label7: TLabel
    Left = 24
    Top = 592
    Width = 7
    Height = 13
    Caption = 'Z'
  end
  object Panel1: TPanel
    Left = 24
    Top = 16
    Width = 502
    Height = 502
    TabOrder = 0
    object Image1: TImage
      Left = 1
      Top = 1
      Width = 500
      Height = 500
      Align = alClient
      OnMouseDown = Image1MouseDown
      OnMouseMove = Image1MouseMove
    end
  end
  object lbPontos: TListBox
    Left = 704
    Top = 184
    Width = 153
    Height = 193
    ItemHeight = 13
    TabOrder = 1
  end
  object btNovo: TButton
    Left = 640
    Top = 16
    Width = 137
    Height = 33
    Caption = 'Novo Poligono'
    TabOrder = 2
    OnClick = btNovoClick
  end
  object lbPoligonos: TListBox
    Left = 544
    Top = 184
    Width = 137
    Height = 193
    ItemHeight = 13
    TabOrder = 3
    OnClick = lbPoligonosClick
  end
  object edX: TEdit
    Left = 40
    Top = 528
    Width = 65
    Height = 21
    TabOrder = 4
    Text = '0'
  end
  object edY: TEdit
    Left = 40
    Top = 560
    Width = 65
    Height = 21
    TabOrder = 5
    Text = '0'
  end
  object btTranslacao: TButton
    Left = 16
    Top = 624
    Width = 99
    Height = 25
    Caption = 'Transla'#231#227'o'
    TabOrder = 6
    OnClick = btTranslacaoClick
  end
  object btRotaciona: TButton
    Left = 128
    Top = 624
    Width = 99
    Height = 25
    Caption = 'Rotaciona'
    TabOrder = 7
    OnClick = btRotacionaClick
  end
  object etGraus: TEdit
    Left = 160
    Top = 528
    Width = 65
    Height = 21
    TabOrder = 8
    Text = '0'
  end
  object btFlexionaX: TButton
    Left = 128
    Top = 664
    Width = 97
    Height = 25
    Caption = 'Flexiona X'
    TabOrder = 9
    OnClick = btFlexionaXClick
  end
  object btEscalona: TButton
    Left = 16
    Top = 664
    Width = 97
    Height = 25
    Caption = 'Escalona'
    TabOrder = 10
    OnClick = btEscalonaClick
  end
  object rgTipoDesenho: TRadioGroup
    Left = 544
    Top = 64
    Width = 137
    Height = 105
    Caption = 'M'#233'todo de Desenho'
    ItemIndex = 0
    Items.Strings = (
      'DrawLine'
      'DDA'
      'Bresenham')
    TabOrder = 11
    OnClick = rgTipoDesenhoClick
  end
  object btCima: TButton
    Left = 608
    Top = 392
    Width = 75
    Height = 25
    Caption = 'Cima'
    TabOrder = 12
    OnClick = btCimaClick
  end
  object btBaixo: TButton
    Left = 608
    Top = 456
    Width = 75
    Height = 25
    Caption = 'Baixo'
    TabOrder = 13
    OnClick = btBaixoClick
  end
  object btDireita: TButton
    Left = 688
    Top = 424
    Width = 75
    Height = 25
    Caption = 'Direita'
    TabOrder = 14
    OnClick = btDireitaClick
  end
  object btEsquerda: TButton
    Left = 528
    Top = 424
    Width = 75
    Height = 25
    Caption = 'Esquerda'
    TabOrder = 15
    OnClick = btEsquerdaClick
  end
  object btZoomIn: TButton
    Left = 784
    Top = 400
    Width = 75
    Height = 25
    Caption = 'Zoom +'
    TabOrder = 16
    OnClick = btZoomInClick
  end
  object btZoomOut: TButton
    Left = 784
    Top = 448
    Width = 75
    Height = 25
    Caption = 'Zoom -'
    TabOrder = 17
    OnClick = btZoomOutClick
  end
  object rgTipoTransformacao: TRadioGroup
    Left = 240
    Top = 520
    Width = 97
    Height = 81
    Caption = 'Transforma'#231#227'o'
    ItemIndex = 0
    Items.Strings = (
      'Normal'
      'Homogenea')
    TabOrder = 18
    OnClick = rgTipoTransformacaoClick
  end
  object etRaio: TEdit
    Left = 160
    Top = 560
    Width = 65
    Height = 21
    TabOrder = 19
    Text = '0'
  end
  object btCircunferencia: TButton
    Left = 240
    Top = 624
    Width = 97
    Height = 25
    Caption = 'Circunferencia'
    TabOrder = 20
    OnClick = btCircunferenciaClick
  end
  object btCurva: TButton
    Left = 792
    Top = 16
    Width = 137
    Height = 33
    Caption = 'Nova Curva'
    TabOrder = 21
    OnClick = btCurvaClick
  end
  object rgTipoCurva: TRadioGroup
    Left = 704
    Top = 64
    Width = 145
    Height = 105
    Caption = 'Tipos de Curva'
    Items.Strings = (
      'Casteljau'
      'Hermite'
      'Bezier'
      'B-Spline'
      'Forward Difference')
    TabOrder = 22
    OnClick = rgTipoCurvaClick
  end
  object btFlexionaY: TButton
    Left = 240
    Top = 664
    Width = 97
    Height = 25
    Caption = 'Flexiona Y'
    TabOrder = 23
    OnClick = btFlexionaYClick
  end
  object btClipping: TButton
    Left = 552
    Top = 584
    Width = 105
    Height = 33
    Caption = 'Clipping'
    TabOrder = 24
    OnClick = btClippingClick
  end
  object bt3D: TButton
    Left = 536
    Top = 528
    Width = 137
    Height = 33
    Caption = 'Novo Poligono 3D'
    TabOrder = 25
    OnClick = bt3DClick
  end
  object rgTipoPoligono3D: TRadioGroup
    Left = 440
    Top = 520
    Width = 81
    Height = 81
    Caption = 'Poligono 3D'
    Items.Strings = (
      'Cubo'
      'Cubo 2'
      'Piramide'
      'Piramide 2')
    TabOrder = 26
    OnClick = rgTipoPoligono3DClick
  end
  object btRotaciona3D: TButton
    Left = 352
    Top = 624
    Width = 97
    Height = 25
    Caption = 'Rotaciona 3D'
    TabOrder = 27
    OnClick = btRotaciona3DClick
  end
  object rgTipoEixo: TRadioGroup
    Left = 352
    Top = 520
    Width = 73
    Height = 81
    Caption = 'Eixo'
    ItemIndex = 0
    Items.Strings = (
      'X'
      'Y'
      'Z'
      'XYZ')
    TabOrder = 28
    OnClick = rgTipoEixoClick
  end
  object btEscalona3D: TButton
    Left = 464
    Top = 664
    Width = 97
    Height = 25
    Caption = 'Escalona 3D'
    TabOrder = 29
    OnClick = btEscalona3DClick
  end
  object btTranslada3D: TButton
    Left = 352
    Top = 664
    Width = 97
    Height = 25
    Caption = 'Transla'#231#227'o 3D'
    TabOrder = 30
    OnClick = btTranslada3DClick
  end
  object edZ: TEdit
    Left = 40
    Top = 592
    Width = 65
    Height = 21
    TabOrder = 31
    Text = '0'
  end
end