Chip 2000 August/Chip_2000-08_cd1.bin/sharewar/alteam/tsetup.exe/%TEAMWEBDIR%/TeamWebControl.exe/0/RCDATA/TWEBCONTROLFORM/TWEBCONTROLFORM.txt

Text File | 2000-06-20 | 9.1 KB | 381 lines

object WebControlForm: TWebControlForm
  Left = 369
  Top = 202
  Width = 600
  Height = 440
  HorzScrollBar.Visible = False
  VertScrollBar.Visible = False
  BorderIcons = [biSystemMenu]
  Caption = 'Alexsys Team-Web Control Panel'
  Color = clBtnFace
  Constraints.MinHeight = 440
  Constraints.MinWidth = 600
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poDesktopCenter
  Scaled = False
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnShow = FormShow
  PixelsPerInch = 120
  TextHeight = 16
  object DlgButtonPanel1: TDlgButtonPanel
    Left = 0
    Top = 368
    Width = 592
    Height = 45
    Align = alBottom
    BevelOuter = bvNone
    BiDiMode = bdLeftToRight
    ParentBiDiMode = False
    TabOrder = 0
    ButtonWidth = 110
    ButtonSpacer = 20
    object CancelButton: TBitBtn
      Left = 474
      Top = 8
      Width = 110
      Height = 29
      Caption = 'Ca&ncel'
      Default = True
      ModalResult = 1
      TabOrder = 1
      OnClick = CancelClick
    end
    object ApplyBtn: TBitBtn
      Left = 344
      Top = 8
      Width = 110
      Height = 29
      Caption = '&Apply'
      Default = True
      ModalResult = 1
      TabOrder = 0
      OnClick = ApplyChanges
    end
  end
  object PageControl1: TPageControl
    Left = 8
    Top = 4
    Width = 576
    Height = 360
    ActivePage = PathSheet
    Anchors = [akLeft, akTop, akRight, akBottom]
    TabOrder = 1
    object PathSheet: TTabSheet
      Caption = ' Paths '
      object Label4: TLabel
        Left = 15
        Top = 20
        Width = 321
        Height = 19
        Caption = 'Team Database and Web Page Locations'
        Font.Charset = ANSI_CHARSET
        Font.Color = clNavy
        Font.Height = -17
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object WebPathLabel: TLabel
        Left = 30
        Top = 65
        Width = 110
        Height = 16
        AutoSize = False
        Caption = 'Team-Web Path:'
      end
      object Label1: TLabel
        Left = 30
        Top = 105
        Width = 110
        Height = 16
        AutoSize = False
        Caption = '&Team Directory:'
      end
      object WebPageLabelLabel: TLabel
        Left = 30
        Top = 220
        Width = 110
        Height = 16
        AutoSize = False
        Caption = 'Web Page Path:'
        Enabled = False
        Visible = False
      end
      object ActiveDBLabel: TLabel
        Left = 32
        Top = 160
        Width = 110
        Height = 16
        AutoSize = False
        Caption = 'Active Database:'
      end
      object AlexMsgPath: TAlexEdit
        Left = 150
        Top = 65
        Width = 385
        Height = 24
        TabStop = False
        Anchors = [akLeft, akTop, akRight]
        Color = clBtnFace
        ReadOnly = True
        TabOrder = 0
        Text = 'AlexMsgPath'
        OnEnter = ClearActive
      end
      object ServerPath: TAlexEdit
        Left = 150
        Top = 105
        Width = 385
        Height = 24
        Anchors = [akLeft, akTop, akRight]
        Color = clBtnFace
        ReadOnly = True
        TabOrder = 1
        Text = 'ServerPath'
        OnChange = CheckChanges
        OnClick = CheckChanges
        OnEnter = SetActiveEdit
      end
      object WebPath: TAlexEdit
        Left = 150
        Top = 220
        Width = 385
        Height = 24
        Anchors = [akLeft, akTop, akRight]
        Color = clBtnFace
        Enabled = False
        TabOrder = 2
        Text = 'WebPath'
        Visible = False
        OnChange = CheckChanges
        OnClick = CheckChanges
        OnEnter = ClearActive
      end
      object BrowseBtn: TBitBtn
        Left = 429
        Top = 260
        Width = 107
        Height = 31
        Anchors = [akTop, akRight]
        Caption = 'B&rowse'
        Default = True
        Enabled = False
        ModalResult = 1
        TabOrder = 3
        Visible = False
        OnClick = B
      end
      object ProductionRadio: TRadioButton
        Left = 152
        Top = 160
        Width = 180
        Height = 17
        Caption = 'Production Database'
        TabOrder = 4
        OnClick = CheckChanges
      end
      object SampleDBRadio: TRadioButton
        Left = 336
        Top = 160
        Width = 180
        Height = 17
        Caption = 'Sample Database'
        TabOrder = 5
        OnClick = CheckChanges
      end
    end
    object TabSheet4: TTabSheet
      Caption = 'Sessions'
      ImageIndex = 3
      object Label6: TLabel
        Left = 20
        Top = 20
        Width = 172
        Height = 19
        Caption = 'User Session Timeout'
        Font.Charset = ANSI_CHARSET
        Font.Color = clNavy
        Font.Height = -17
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object Label3: TLabel
        Left = 30
        Top = 65
        Width = 225
        Height = 16
        AutoSize = False
        Caption = 'Inactive minutes before termination: '
        FocusControl = SessionTimerEdit
      end
      object Label9: TLabel
        Left = 30
        Top = 115
        Width = 500
        Height = 190
        Anchors = [akLeft, akTop, akRight]
        AutoSize = False
        Caption =
          'Note: This time represents the number of Inactive minutes before' +
          '  a user'#39's session is terminated.'
        FocusControl = SMTPEdit
        WordWrap = True
      end
      object SessionTimerEdit: TAlexEdit
        Left = 260
        Top = 65
        Width = 40
        Height = 24
        Anchors = [akLeft, akTop, akRight]
        TabOrder = 0
        Text = '60'
        OnChange = CheckChanges
        OnClick = CheckChanges
        StandardEdit = True
      end
      object SessionUpDown: TUpDown
        Left = 300
        Top = 65
        Width = 15
        Height = 24
        Associate = SessionTimerEdit
        Min = 5
        Max = 60
        Position = 60
        TabOrder = 1
        Thousands = False
        Wrap = True
        OnClick = SessionUpDownClick
      end
    end
    object TabSheet1: TTabSheet
      Caption = 'Mail Settings'
      ImageIndex = 2
      object Label5: TLabel
        Left = 20
        Top = 20
        Width = 100
        Height = 19
        Caption = 'Mail Settings'
        Font.Charset = ANSI_CHARSET
        Font.Color = clNavy
        Font.Height = -17
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object Label7: TLabel
        Left = 30
        Top = 65
        Width = 124
        Height = 16
        Caption = 'SMTP Server Name:'
        FocusControl = SMTPEdit
      end
      object Label8: TLabel
        Left = 30
        Top = 115
        Width = 500
        Height = 192
        Anchors = [akLeft, akTop, akRight]
        AutoSize = False
        Caption =
          'Note: Clear the SMTP path to stop TeamWeb from sending mail noti' +
          'fications.'
        FocusControl = SMTPEdit
      end
      object SMTPEdit: TAlexEdit
        Left = 175
        Top = 65
        Width = 360
        Height = 24
        Anchors = [akLeft, akTop, akRight]
        TabOrder = 0
        OnChange = CheckChanges
        OnClick = CheckChanges
        OnEnter = SetActiveEdit
      end
    end
    object TabSheet2: TTabSheet
      Caption = ' Debug Settings '
      ImageIndex = 3
      object Label2: TLabel
        Left = 15
        Top = 20
        Width = 204
        Height = 19
        Caption = 'Debug and Trace Settings'
        Font.Charset = ANSI_CHARSET
        Font.Color = clNavy
        Font.Height = -17
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object DebugLabel: TLabel
        Left = 30
        Top = 65
        Width = 110
        Height = 16
        AutoSize = False
        Caption = '&Debug Tracing:'
      end
      object Label10: TLabel
        Left = 30
        Top = 115
        Width = 500
        Height = 192
        Anchors = [akLeft, akTop, akRight]
        AutoSize = False
        Caption =
          'Note: Normally '#39'No Tracing'#39' is selected. Only set tracing active' +
          ' if instructed to do so by the Alexsys support staff.'
        FocusControl = SMTPEdit
        WordWrap = True
      end
      object DebugCombo: TComboBox
        Left = 160
        Top = 65
        Width = 160
        Height = 24
        Style = csDropDownList
        ItemHeight = 16
        Items.Strings = (
          'No Tracing'
          'Trace Errors Only'
          'Trace Calls'
          'Trace Verbose')
        TabOrder = 0
        OnChange = CheckChanges
        OnClick = CheckChanges
      end
      object OneStreamCheckBox: TCheckBox
        Left = 230
        Top = 306
        Width = 329
        Height = 17
        Caption = 'Permit only one  execution stream at a time'
        TabOrder = 1
        Visible = False
        OnClick = CheckChanges
      end
    end
  end
  object BrowseDirectoryDlg1: TBrowseDirectoryDlg
    Title = 'Select the server directory containing the Alexsys Team files.'
    Root = idDesktopExpanded
    Options = [bfDirectoriesOnly]
    Caption = 'Alexsys Team Directory'
    ShowSelectionInStatus = True
    Left = 526
    Top = 3
  end
end