Chip 2001 February/Chip_2001-02_cd1.bin/sharewar/argonaut/FILEDATA.DAT/argo2/Argonaut.exe/0/RCDATA/TARGOLOGDLG/TARGOLOGDLG.txt

Text File | 2000-06-30 | 9KB | 361 lines

object ArgoLogDlg: TArgoLogDlg
  Left = 38
  Top = 113
  HelpContext = 8
  ActiveControl = OKBtn
  BorderIcons = [biSystemMenu]
  BorderStyle = bsDialog
  Caption = 'ArgoNaut - Logbook'
  ClientHeight = 231
  ClientWidth = 557
  Font.Color = clBlack
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = [fsBold]
  Position = poScreenCenter
  OnActivate = FormActivate
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 424
    Top = 115
    Width = 65
    Height = 13
    Caption = 'File record:'
  end
  object Label2: TLabel
    Left = 8
    Top = 16
    Width = 44
    Height = 13
    Caption = 'Interval'
  end
  object Label3: TLabel
    Left = 8
    Top = 48
    Width = 50
    Height = 13
    Caption = 'File-path'
  end
  object Label4: TLabel
    Left = 424
    Top = 180
    Width = 83
    Height = 13
    Caption = 'Show in chart:'
  end
  object Label5: TLabel
    Left = 424
    Top = 192
    Width = 32
    Height = 13
    Caption = 'From:'
  end
  object Label6: TLabel
    Left = 496
    Top = 192
    Width = 20
    Height = 13
    Caption = 'To:'
  end
  object Label7: TLabel
    Left = 8
    Top = 80
    Width = 51
    Height = 13
    Caption = 'Log-Text'
  end
  object OKBtn: TBitBtn
    Left = 416
    Top = 8
    Width = 137
    Height = 27
    Hint = 'Close window.'
    Caption = 'Close'
    ParentShowHint = False
    ShowHint = True
    TabOrder = 0
    OnClick = OKBtnClick
    Glyph.Data = {
      DE010000424DDE01000000000000760000002800000024000000120000000100
      0400000000006801000000000000000000000000000000000000000000000000
      8000008000000080800080000000800080008080000080808000C0C0C0000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      3333333333333333333333330000333333333333333333333333F33333333333
      00003333344333333333333333377F3333333333000033334224333333333333
      337337F3333333330000333422224333333333333733337F3333333300003342
      222224333333333373333337F3333333000034222A22224333333337F337F333
      7F33333300003222A3A2224333333337F3737F337F33333300003A2A333A2224
      33333337F73337F337F33333000033A33333A222433333337333337F337F3333
      0000333333333A222433333333333337F337F33300003333333333A222433333
      333333337F337F33000033333333333A222433333333333337F337F300003333
      33333333A222433333333333337F337F00003333333333333A22433333333333
      3337F37F000033333333333333A223333333333333337F730000333333333333
      333A333333333333333337330000333333333333333333333333333333333333
      0000}
    Margin = 2
    NumGlyphs = 2
    Spacing = -1
    IsControl = True
  end
  object HelpBtn: TBitBtn
    Left = 416
    Top = 40
    Width = 137
    Height = 27
    TabOrder = 1
    OnClick = HelpBtnClick
    Kind = bkHelp
    Margin = 2
    Spacing = -1
    IsControl = True
  end
  object OpenBtn: TBitBtn
    Left = 416
    Top = 76
    Width = 137
    Height = 25
    Hint = 'Open log-file'
    Caption = 'Open'
    ParentShowHint = False
    ShowHint = True
    TabOrder = 2
    OnClick = OpenBtnClick
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000130B0000130B00000000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333
      333B33FF33337F3333F73BB3777BB7777BB3377FFFF77FFFF77333B000000000
      0B3333777777777777333330FFFFFFFF07333337F33333337F333330FFFFFFFF
      07333337F3FF3FFF7F333330F00F000F07333337F77377737F333330FFFFFFFF
      07333FF7F3FFFF3F7FFFBBB0F0000F0F0BB37777F7777373777F3BB0FFFFFFFF
      0BBB3777F3FF3FFF77773330F00F000003333337F773777773333330FFFF0FF0
      33333337F3FF7F37F3333330F08F0F0B33333337F7737F77FF333330FFFF003B
      B3333337FFFF77377FF333B000000333BB33337777777F3377FF3BB3333BB333
      3BB33773333773333773B333333B3333333B7333333733333337}
    NumGlyphs = 2
  end
  object UseBtn: TBitBtn
    Left = 168
    Top = 8
    Width = 89
    Height = 25
    Hint = 'Select log-file'
    Caption = 'Use'
    ParentShowHint = False
    ShowHint = True
    TabOrder = 12
    OnClick = UseBtnClick
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000130B0000130B00000000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333330070
      7700333333337777777733333333008088003333333377F73377333333330088
      88003333333377FFFF7733333333000000003FFFFFFF77777777000000000000
      000077777777777777770FFFFFFF0FFFFFF07F3333337F3333370FFFFFFF0FFF
      FFF07F3FF3FF7FFFFFF70F00F0080CCC9CC07F773773777777770FFFFFFFF039
      99337F3FFFF3F7F777F30F0000F0F09999937F7777373777777F0FFFFFFFF999
      99997F3FF3FFF77777770F00F000003999337F773777773777F30FFFF0FF0339
      99337F3FF7F3733777F30F08F0F0337999337F7737F73F7777330FFFF0039999
      93337FFFF7737777733300000033333333337777773333333333}
    NumGlyphs = 2
  end
  object SpinIntervall: TSpinEdit
    Left = 64
    Top = 8
    Width = 89
    Height = 26
    Hint = 'Log-interval (minutes).'
    AutoSize = False
    EditorEnabled = False
    Increment = 5
    MaxLength = 2
    MaxValue = 60
    MinValue = 5
    ParentShowHint = False
    ShowHint = True
    TabOrder = 11
    Value = 5
    OnChange = SpinIntervallChange
  end
  object FilePathEdit: TEdit
    Left = 64
    Top = 40
    Width = 337
    Height = 21
    Hint = 'Click use-button to select log-file'
    TabStop = False
    ParentShowHint = False
    ReadOnly = True
    ShowHint = True
    TabOrder = 15
  end
  object GroupBox1: TGroupBox
    Left = 8
    Top = 104
    Width = 395
    Height = 121
    Caption = 'View log-file'
    TabOrder = 16
    object LabelPosition: TLabel
      Left = 8
      Top = 24
      Width = 5
      Height = 13
    end
    object LabelDirPos: TLabel
      Left = 8
      Top = 48
      Width = 5
      Height = 13
    end
    object LabelTime: TLabel
      Left = 8
      Top = 72
      Width = 5
      Height = 13
    end
    object LabelText: TLabel
      Left = 8
      Top = 96
      Width = 5
      Height = 13
    end
  end
  object LogOnBtn: TBitBtn
    Left = 272
    Top = 8
    Width = 129
    Height = 25
    Hint = 'Log On/Off.'
    Caption = 'Log : Off'
    ParentShowHint = False
    ShowHint = True
    TabOrder = 13
    OnClick = LogOnBtnClick
    NumGlyphs = 2
  end
  object FromEdit: TEdit
    Left = 424
    Top = 205
    Width = 57
    Height = 21
    Hint = 'Show from this record.'
    ParentShowHint = False
    ShowHint = True
    TabOrder = 9
    OnExit = FromEditExit
  end
  object ToEdit: TEdit
    Left = 496
    Top = 205
    Width = 57
    Height = 21
    Hint = 'Show to this record.'
    ParentShowHint = False
    ShowHint = True
    TabOrder = 10
    OnExit = ToEditExit
  end
  object TextEdit: TEdit
    Left = 64
    Top = 72
    Width = 337
    Height = 21
    Hint = 'Enter text to save in log-file.'
    ParentShowHint = False
    ShowHint = True
    TabOrder = 14
  end
  object Edit1: TEdit
    Left = 496
    Top = 112
    Width = 57
    Height = 21
    TabStop = False
    ReadOnly = True
    TabOrder = 17
    Text = ' '
  end
  object Plus1btn: TButton
    Left = 424
    Top = 136
    Width = 33
    Height = 17
    Caption = '+1'
    TabOrder = 3
    OnClick = Plus1btnClick
  end
  object Plus10btn: TButton
    Left = 464
    Top = 136
    Width = 41
    Height = 17
    Caption = '+10'
    TabOrder = 4
    OnClick = Plus10btnClick
  end
  object Plus100btn: TButton
    Left = 512
    Top = 136
    Width = 41
    Height = 17
    Caption = '+100'
    TabOrder = 5
    OnClick = Plus100btnClick
  end
  object Minus1btn: TButton
    Left = 424
    Top = 160
    Width = 33
    Height = 17
    Caption = '-1'
    TabOrder = 6
    OnClick = Minus1btnClick
  end
  object Minus10btn: TButton
    Left = 464
    Top = 160
    Width = 41
    Height = 17
    Caption = '-10'
    TabOrder = 7
    OnClick = Minus10btnClick
  end
  object Minus100btn: TButton
    Left = 512
    Top = 160
    Width = 41
    Height = 17
    Caption = '-100'
    TabOrder = 8
    OnClick = Minus100btnClick
  end
  object LogTimer: TTimer
    Interval = 60000
    OnTimer = LogTimerTimer
    Left = 160
    Top = 184
  end
  object OpenLogDialog: TOpenDialog
    DefaultExt = 'LOG'
    FileEditStyle = fsEdit
    Filter = 'Log-files|*.LOG'
    Options = [ofHideReadOnly, ofPathMustExist, ofFileMustExist]
    Title = 'Open log-file'
    Left = 112
    Top = 184
  end
  object UseLogDialog: TSaveDialog
    DefaultExt = 'LOG'
    FileEditStyle = fsEdit
    Filter = 'Log-files|*.LOG'
    Options = [ofHideReadOnly, ofPathMustExist]
    Title = 'Use as log-file'
    Left = 208
    Top = 184
  end
end