object Automat1: TAutomat1 Left = 128 Top = 126 BorderIcons = [] BorderStyle = bsDialog Caption = 'Automatische Werte - Suche' ClientHeight = 117 ClientWidth = 242 Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Position = poDefaultSizeOnly OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object Label1: TLabel Left = 20 Top = 14 Width = 207 Height = 20 Caption = 'Bitte den Startwert eingeben ' Font.Color = clBlack Font.Height = -16 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Edit1: TEdit Left = 68 Top = 42 Width = 82 Height = 21 TabOrder = 0 OnChange = Edit1Change end object Button1: TButton Left = 32 Top = 73 Width = 75 Height = 25 Caption = 'OK' TabOrder = 1 OnClick = Button1Click end object Button2: TButton Left = 118 Top = 73 Width = 75 Height = 25 Caption = 'Abbrechen' TabOrder = 2 OnClick = Button2Click end end