object OnlineProform: TOnlineProform Left = 33 Top = 395 BorderStyle = bsToolWindow Caption = 'ProDelphi - online operation' ClientHeight = 236 ClientWidth = 296 Color = clPurple Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] FormStyle = fsMDIForm OldCreateOrder = True Position = poDefaultPosOnly Visible = True OnCreate = Erzeugen OnDestroy = Zerstoeren PixelsPerInch = 96 TextHeight = 13 object Panel2: TPanel Left = 2 Top = 100 Width = 290 Height = 73 BevelOuter = bvNone Color = clPurple TabOrder = 5 object RunId: TLabel Left = 252 Top = 4 Width = 31 Height = 13 AutoSize = False Caption = '1' Font.Charset = DEFAULT_CHARSET Font.Color = clYellow Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Label5: TLabel Left = 10 Top = 4 Width = 233 Height = 13 AutoSize = False Caption = 'Next runtimes will be stored with Run-Id:' Font.Charset = DEFAULT_CHARSET Font.Color = clYellow Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Label1: TLabel Left = 10 Top = 28 Width = 73 Height = 17 AutoSize = False Caption = 'CPU-Speed:' Font.Charset = ANSI_CHARSET Font.Color = clWhite Font.Height = -11 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object CPUFrequenz: TLabel Left = 10 Top = 45 Width = 29 Height = 17 Alignment = taRightJustify AutoSize = False Caption = '2000' Color = clPurple Font.Charset = DEFAULT_CHARSET Font.Color = clWhite Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentColor = False ParentFont = False end object Label3: TLabel Left = 45 Top = 45 Width = 26 Height = 17 AutoSize = False Caption = 'MHz' Font.Charset = DEFAULT_CHARSET Font.Color = clWhite Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object GroupBox2: TGroupBox Left = 78 Top = 24 Width = 208 Height = 41 Caption = 'Comment for the next stored runtimes: ' Color = clPurple Font.Charset = DEFAULT_CHARSET Font.Color = clWhite Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentColor = False ParentFont = False TabOrder = 0 object Edit1: TEdit Left = 6 Top = 15 Width = 195 Height = 22 Color = clWhite Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False TabOrder = 0 Text = 'none' end end end object Button1: TButton Left = 8 Top = 8 Width = 281 Height = 17 Caption = 'Start measurement and collect runtimes in memory' Font.Charset = DEFAULT_CHARSET Font.Color = clMaroon Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 0 OnClick = StarteMessung end object Button2: TButton Left = 8 Top = 32 Width = 281 Height = 17 Caption = 'Stop measurement and collecting runtimes in memory' TabOrder = 1 OnClick = StoppeMessung end object Button3: TButton Left = 8 Top = 80 Width = 281 Height = 17 Caption = 'Add collected runtimes to file and delete in memory' TabOrder = 2 OnClick = Anhaengen end object Button4: TButton Left = 8 Top = 56 Width = 281 Height = 17 Caption = 'Delete runtimes collected in memory' TabOrder = 3 OnClick = ResultatLoeschen end object Panel1: TPanel Left = 8 Top = 174 Width = 281 Height = 55 TabOrder = 4 object MinLab: TLabel Left = 197 Top = 5 Width = 17 Height = 13 Alignment = taCenter AutoSize = False Caption = '30' Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentColor = False ParentFont = False end object Label6: TLabel Left = 216 Top = 5 Width = 45 Height = 13 AutoSize = False Caption = 'minute(s)' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object CycBut: TCheckBox Left = 16 Top = 4 Width = 181 Height = 17 Caption = 'Cyclic measurement storage every' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 0 OnClick = ActDeact end object FrequAnz: TTrackBar Left = 3 Top = 22 Width = 273 Height = 29 Max = 60 Min = 1 Orientation = trHorizontal ParentShowHint = False Frequency = 1 Position = 30 SelEnd = 1 SelStart = 60 ShowHint = False TabOrder = 1 ThumbLength = 20 TickMarks = tmBottomRight TickStyle = tsNone OnChange = TickChange end end object CycTimer: TTimer Enabled = False Interval = 1800000 OnTimer = CycAppend Left = 248 Top = 62 end end