summaryrefslogtreecommitdiff
path: root/unit1.lfm
diff options
context:
space:
mode:
Diffstat (limited to 'unit1.lfm')
-rw-r--r--unit1.lfm165
1 files changed, 165 insertions, 0 deletions
diff --git a/unit1.lfm b/unit1.lfm
new file mode 100644
index 0000000..a5e7184
--- /dev/null
+++ b/unit1.lfm
@@ -0,0 +1,165 @@
+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