Chip 2002 December/Chip_2002-12_cd1.bin/zkuste/delphi/nastroje/d23456/PRODEL.ZIP/PROFONLC.XF7/PROFONLC.txt

Text File | 2002-07-07 | 6KB | 293 lines

object OnlineProform: TOnlineProform
  Left = 268
  Top = 271
  Width = 296
  Height = 236
  VertScrollBar.Range = 229
  HorzScrollBar.Range = 292
  ActiveControl = Button1
  BorderStyle = fbsToolWindow
  Caption = 'ProDelphi  -  online operation'
  Color = clPurple
  Font.Color = clText
  Font.Height = 11
  Font.Name = 'Arial'
  Font.Pitch = fpVariable
  Font.Style = []
  Font.Weight = 40
  FormStyle = fsMDIForm
  ParentFont = False
  Position = poDefaultPosOnly
  Visible = True
  OnCreate = Erzeugen
  OnDestroy = Zerstoeren
  PixelsPerInch = 96
  TextHeight = 14
  TextWidth = 6
  object Panel2: TPanel
    Left = 2
    Top = 100
    Width = 290
    Height = 73
    BevelOuter = bvNone
    TabOrder = 5
    object RunId: TLabel
      Left = 252
      Top = 4
      Width = 31
      Height = 13
      AutoSize = False
      Caption = '1'
      Font.Color = clYellow
      Font.Height = 11
      Font.Name = 'MS Sans Serif'
      Font.Pitch = fpVariable
      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.Color = clYellow
      Font.Height = 11
      Font.Name = 'Arial'
      Font.Pitch = fpVariable
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label1: TLabel
      Left = 10
      Top = 28
      Width = 73
      Height = 17
      AutoSize = False
      Caption = 'CPU-Speed:'
      Font.CharSet = fcsLatin1
      Font.Color = clWhite
      Font.Height = 11
      Font.Name = 'Arial'
      Font.Pitch = fpVariable
      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.Color = clWhite
      Font.Height = 11
      Font.Name = 'MS Sans Serif'
      Font.Pitch = fpVariable
      Font.Style = [fsBold]
      ParentColor = False
      ParentFont = False
    end
    object Label3: TLabel
      Left = 45
      Top = 45
      Width = 26
      Height = 17
      AutoSize = False
      Caption = 'MHz'
      Font.Color = clWhite
      Font.Height = 11
      Font.Name = 'MS Sans Serif'
      Font.Pitch = fpVariable
      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.Color = clWhite
      Font.Height = 11
      Font.Name = 'Arial'
      Font.Pitch = fpVariable
      Font.Style = []
      Font.Weight = 40
      ParentColor = False
      ParentFont = False
      TabOrder = 0
      object Edit1: TEdit
        Left = 6
        Top = 15
        Width = 195
        Height = 22
        Color = clWhite
        Font.Color = clBlack
        Font.Height = 11
        Font.Name = 'Arial'
        Font.Pitch = fpVariable
        Font.Style = []
        Font.Weight = 40
        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.Color = clText
    Font.Height = 11
    Font.Name = 'Arial'
    Font.Pitch = fpVariable
    Font.Style = []
    Font.Weight = 40
    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'
    Font.Color = clText
    Font.Height = 11
    Font.Name = 'Arial'
    Font.Pitch = fpVariable
    Font.Style = []
    Font.Weight = 40
    ParentFont = False
    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'
    Font.Color = clText
    Font.Height = 11
    Font.Name = 'Arial'
    Font.Pitch = fpVariable
    Font.Style = []
    Font.Weight = 40
    ParentFont = False
    TabOrder = 2
    OnClick = Anhaengen
  end
  object Button4: TButton
    Left = 8
    Top = 56
    Width = 281
    Height = 17
    Caption = 'Delete runtimes collected in memory'
    Font.Color = clText
    Font.Height = 11
    Font.Name = 'Arial'
    Font.Pitch = fpVariable
    Font.Style = []
    Font.Weight = 40
    ParentFont = False
    TabOrder = 3
    OnClick = ResultatLoeschen
  end
  object Panel1: TPanel
    Left = 8
    Top = 174
    Width = 281
    Height = 55
    Color = clButton
    Font.Color = clText
    Font.Height = 11
    Font.Name = 'Arial'
    Font.Pitch = fpVariable
    Font.Style = []
    Font.Weight = 40
    ParentColor = False
    ParentFont = False
    TabOrder = 4
    object MinLab: TLabel
      Left = 197
      Top = 5
      Width = 17
      Height = 13
      Alignment = taCenter
      AutoSize = False
      Caption = '30'
      Color = clButton
      Font.Color = clText
      Font.Height = 11
      Font.Name = 'Arial'
      Font.Pitch = fpVariable
      Font.Style = []
      Font.Weight = 40
      ParentColor = False
      ParentFont = False
    end
    object Label6: TLabel
      Left = 216
      Top = 5
      Width = 45
      Height = 13
      AutoSize = False
      Caption = 'minute(s)'
      Font.Color = clText
      Font.Height = 11
      Font.Name = 'Arial'
      Font.Pitch = fpVariable
      Font.Style = []
      Font.Weight = 40
      ParentFont = False
    end
    object CycBut: TCheckBox
      Left = 16
      Top = 4
      Width = 181
      Height = 17
      Caption = 'Cyclic measurement storage every'
      Font.Color = clText
      Font.Height = 11
      Font.Name = 'Arial'
      Font.Pitch = fpVariable
      Font.Style = []
      Font.Weight = 40
      ParentFont = False
      TabOrder = 0
      OnClick = ActDeact
    end
    object FrequAnz: TTrackBar
      Left = 3
      Top = 22
      Width = 273
      Height = 29
      Max = 60
      Min = 1
      ParentShowHint = False
      Position = 30
      ShowHint = False
      TabOrder = 1
      TickStyle = tsNone
      OnChange = TickChange
    end
  end
  object CycTimer: TTimer
    Enabled = False
    Interval = 1800000
    OnTimer = CycAppend
    Left = 248
    Top = 62
  end
end