object Form1: TForm1 Left = 93 Height = 551 Top = 315 Width = 1225 Caption = 'Form1' ClientHeight = 551 ClientWidth = 1225 Color = clBtnFace DesignTimePPI = 107 Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' OnActivate = FormActivate OnCreate = FormCreate OnDestroy = FormDestroy OnResize = FormResize LCLVersion = '2.0.12.0' object Image1: TImage Left = 276 Height = 438 Top = 45 Width = 465 end object Image2: TImage Left = 740 Height = 438 Top = 45 Width = 465 end object Label1: TLabel Left = 9 Height = 13 Top = 7 Width = 48 Caption = 'Drehen:' Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' ParentColor = False ParentFont = False end object Image3: TImage Tag = -1 Left = 0 Height = 331 Top = 152 Width = 278 OnMouseDown = Image3MouseDown OnMouseMove = Image3MouseMove OnMouseUp = Image3MouseUp end object RadioGroup1: TRadioGroup Left = 0 Height = 55 Top = 36 Width = 206 AutoFill = True Caption = 'Körper' ChildSizing.LeftRightSpacing = 6 ChildSizing.EnlargeHorizontal = crsHomogenousChildResize ChildSizing.EnlargeVertical = crsHomogenousChildResize ChildSizing.ShrinkHorizontal = crsScaleChilds ChildSizing.ShrinkVertical = crsScaleChilds ChildSizing.Layout = cclLeftToRightThenTopToBottom ChildSizing.ControlsPerLine = 1 ClientHeight = 38 ClientWidth = 202 Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' ItemIndex = 0 Items.Strings = ( 'Deltoidalhexakontaederstern' 'Pentagonhexakontaederstern' ) OnClick = RadioGroup1Click ParentFont = False TabOrder = 0 end object CheckBox1: TCheckBox Left = 62 Height = 21 Top = 6 Width = 98 Caption = 'automatisch' Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' OnClick = CheckBox1Click ParentFont = False TabOrder = 1 end object Button1: TButton Left = 9 Height = 28 Top = 107 Width = 84 Caption = 'Spitze' Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' OnClick = Button1Click ParentFont = False TabOrder = 2 end object Button2: TButton Left = 98 Height = 28 Top = 107 Width = 99 Caption = 'Determinante' Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' OnClick = Button2Click ParentFont = False TabOrder = 3 end object Button3: TButton Left = 169 Height = 28 Top = 0 Width = 126 Caption = 'Spitzen entfernen' Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' OnClick = Button3Click ParentFont = False TabOrder = 4 end object ProgressBar1: TProgressBar Left = 303 Height = 18 Top = 4 Width = 233 Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' ParentFont = False Smooth = True TabOrder = 5 Visible = False end object Button4: TButton Left = 205 Height = 28 Top = 107 Width = 64 Caption = 'Test' Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' OnClick = Button4Click ParentFont = False TabOrder = 6 end object ZeichenTimer: TTimer Enabled = False Interval = 50 OnTimer = ZeichenTimerTimer Top = 27 end end