Chip 2002 March/Chip_2002-03_cd1.bin/tema/thebat/download/update/thebat.exe/0/RCDATA/TCONNECTMONITOR/TCONNECTMONITOR.txt

Text File | 2001-09-09 | 10KB | 422 lines

object ConnectMonitor: TConnectMonitor
  Left = 216
  Top = 149
  Width = 484
  Height = 392
  BorderIcons = [biSystemMenu, biMinimize]
  Caption = 'Connection Centre'
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Position = poScreenCenter
  OnActivate = FormActivate
  OnClose = FormClose
  OnCloseQuery = FormCloseQuery
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Book: TPageControl
    Left = 0
    Top = 0
    Width = 328
    Height = 337
    ActivePage = tsQueue
    Align = alClient
    TabOrder = 0
    OnChange = BookChange
    object tsQueue: TTabSheet
      Caption = 'Queue'
      object pnQueue: TPanel
        Left = 0
        Top = 0
        Width = 320
        Height = 309
        Align = alClient
        BevelOuter = bvNone
        TabOrder = 0
        object Splitter1: TSplitter
          Left = 0
          Top = 120
          Width = 320
          Height = 3
          Cursor = crVSplit
          Align = alTop
          Beveled = False
        end
        object sbBox: TScrollBox
          Left = 0
          Top = 123
          Width = 320
          Height = 186
          VertScrollBar.Tracking = True
          Align = alClient
          TabOrder = 1
          OnResize = sbBoxResize
          object gProgress: TGauge
            Left = 244
            Top = 29
            Width = 49
            Height = 49
            Color = clBtnFace
            Kind = gkPie
            Font.Color = clBlack
            Font.Height = -11
            Font.Name = 'MS Sans Serif'
            Font.Style = []
            BorderStyle = bsNone
            MaxValue = 0
            ParentColor = False
            ParentFont = False
            ParentShowHint = False
            Progress = 0
            ShowHint = False
          end
          object lSize: TLabel
            Left = 198
            Top = 32
            Width = 35
            Height = 13
            Alignment = taRightJustify
            Caption = '0 Bytes'
            Visible = False
          end
          object lZero: TLabel
            Left = 8
            Top = 32
            Width = 6
            Height = 13
            Caption = '0'
            Visible = False
          end
          object lcStatus: TLabel
            Left = 64
            Top = 80
            Width = 241
            Height = 25
            AutoSize = False
            WordWrap = True
          end
          object lblMessage: TLabel
            Left = 8
            Top = 108
            Width = 49
            Height = 13
            Caption = 'Message: '
          end
          object lblXfer: TLabel
            Left = 8
            Top = 128
            Width = 45
            Height = 13
            Caption = 'Transfer: '
          end
          object lblTime: TLabel
            Left = 8
            Top = 148
            Width = 26
            Height = 13
            Caption = 'Time:'
          end
          object Label6: TLabel
            Left = 8
            Top = 172
            Width = 21
            Height = 13
            Caption = '&Log:'
            FocusControl = eLog
          end
          object lblServer: TLabel
            Left = 8
            Top = 8
            Width = 34
            Height = 13
            Caption = 'Server:'
          end
          object lcMessage: TLabel
            Left = 72
            Top = 108
            Width = 32
            Height = 13
            AutoSize = False
          end
          object lcXfer: TLabel
            Left = 64
            Top = 128
            Width = 32
            Height = 13
            AutoSize = False
          end
          object lcTime: TLabel
            Left = 104
            Top = 148
            Width = 38
            Height = 13
            AutoSize = False
          end
          object lblStatus: TLabel
            Left = 8
            Top = 80
            Width = 33
            Height = 13
            Caption = 'Status:'
          end
          object lcServer: TLabel
            Left = 64
            Top = 8
            Width = 241
            Height = 13
            AutoSize = False
          end
          object Bar: TProgressBar
            Left = 8
            Top = 48
            Width = 225
            Height = 17
            Min = 0
            Max = 100
            TabOrder = 0
          end
          object Panel1: TPanel
            Left = 0
            Top = 185
            Width = 305
            Height = 191
            Align = alBottom
            BevelOuter = bvNone
            BorderWidth = 8
            Caption = 'Panel1'
            TabOrder = 1
            object eLog: TMemo
              Left = 8
              Top = 8
              Width = 289
              Height = 175
              Align = alClient
              ReadOnly = True
              ScrollBars = ssBoth
              TabOrder = 0
              WantReturns = False
              WordWrap = False
            end
          end
        end
        object gTasks: TDrawGrid
          Left = 0
          Top = 0
          Width = 320
          Height = 120
          Align = alTop
          ColCount = 8
          Ctl3D = True
          FixedCols = 0
          GridLineWidth = 0
          Options = [goFixedVertLine, goFixedHorzLine, goColSizing, goThumbTracking]
          ParentCtl3D = False
          TabOrder = 0
          OnDrawCell = gTasksDrawCell
          OnEnter = gTasksEnter
          OnExit = gTasksEnter
          OnKeyDown = gTasksKeyDown
          OnSelectCell = gTasksSelectCell
          ColWidths = (
            112
            83
            64
            64
            64
            64
            64
            64)
          RowHeights = (
            24
            24
            24
            24
            24)
        end
      end
    end
    object tsConnect: TTabSheet
      Caption = 'Connection'
      object GroupBox1: TGroupBox
        Left = 8
        Top = 8
        Width = 305
        Height = 185
        Caption = 'Status'
        TabOrder = 0
        object lbStatus: TLabel
          Left = 16
          Top = 64
          Width = 28
          Height = 13
          Caption = 'State:'
        end
        object lDevice: TLabel
          Left = 16
          Top = 104
          Width = 37
          Height = 13
          Caption = 'Device:'
        end
        object lStatus: TLabel
          Left = 96
          Top = 64
          Width = 201
          Height = 33
          AutoSize = False
          ShowAccelChar = False
          WordWrap = True
        end
        object lDevName: TLabel
          Left = 96
          Top = 104
          Width = 201
          Height = 25
          AutoSize = False
          ShowAccelChar = False
          WordWrap = True
        end
        object lError: TLabel
          Left = 16
          Top = 144
          Width = 47
          Height = 13
          Caption = 'Last error:'
          Visible = False
        end
        object lbEntry: TLabel
          Left = 16
          Top = 24
          Width = 86
          Height = 13
          Caption = #39'Phonebook entry:'
        end
        object lEntryName: TLabel
          Left = 112
          Top = 24
          Width = 185
          Height = 33
          AutoSize = False
          WordWrap = True
        end
        object mError: TMemo
          Left = 96
          Top = 144
          Width = 201
          Height = 33
          ScrollBars = ssVertical
          TabOrder = 0
          Visible = False
        end
      end
      object cbInteractive: TCheckBox
        Left = 10
        Top = 208
        Width = 319
        Height = 17
        Caption = 'Do not show error messages, just keep retrying'
        TabOrder = 1
        OnClick = cbInteractiveClick
      end
    end
  end
  object BtnPanel: TPanel
    Left = 328
    Top = 0
    Width = 148
    Height = 337
    Align = alRight
    BevelOuter = bvNone
    TabOrder = 1
    object bDeleteTask: TButton
      Left = 11
      Top = 20
      Width = 126
      Height = 25
      Caption = '&Delete Task'
      TabOrder = 0
      OnClick = bDeleteTaskClick
    end
    object bAbort: TButton
      Left = 11
      Top = 68
      Width = 126
      Height = 25
      Caption = '&Abort'
      TabOrder = 1
      OnClick = bAbortClick
    end
    object bHide: TButton
      Left = 11
      Top = 116
      Width = 126
      Height = 25
      Caption = '&Hide'
      TabOrder = 2
      OnClick = bHideClick
    end
  end
  object pnBottom: TPanel
    Left = 0
    Top = 337
    Width = 476
    Height = 28
    Align = alBottom
    BevelOuter = bvNone
    TabOrder = 2
    object cbAutoDisconnect: TCheckBox
      Left = 12
      Top = 8
      Width = 469
      Height = 17
      Caption = 'Disconnect automatically when session(s) finish'
      TabOrder = 0
    end
  end
  object RAS: TRAS
    OnConnect = RASConnect
    OnDisconnect = RASDisconnect
    OnPortOpened = RASPortOpened
    OnAboutToConnDev = RASPortOpened
    OnDevConnected = RASPortOpened
    OnAllDevsConnected = RASPortOpened
    OnAuthenticate = RASAuthenticate
    OnWaitForModemReset = RASWaitForModemReset
    OnGotError = RASGotError
    Left = 348
    Top = 192
  end
  object tmTreshold: TTimer
    Enabled = False
    OnTimer = tmTresholdTimer
    Left = 385
    Top = 192
  end
  object tmCheckRas: TTimer
    Enabled = False
    OnTimer = tmCheckRasTimer
    Left = 420
    Top = 192
  end
  object lImages: TImageList
    AllocBy = 2
    Left = 353
    Top = 256
  end
  object tmUpdate: TTimer
    Interval = 250
    OnTimer = tmUpdateTimer
    Left = 410
    Top = 240
  end
  object tmDeletedCheck: TTimer
    OnTimer = tmDeletedCheckTimer
    Left = 408
    Top = 272
  end
end