configdialog.dfm

Last change: 2008-02-03 This is the source code of KCeasy。

          Top = 24
          Width = 265
          Height = 13
          AutoSize = False
          Caption = 'Color of normal text with no special meaning'
        end
        object OthersColorLbl: TLabel
          Left = 16
          Top = 52
          Width = 265
          Height = 13
          AutoSize = False
          Caption = 'Color of other people'#39's messages'
        end
        object OwnColorLbl: TLabel
          Left = 16
          Top = 80
          Width = 265
          Height = 13
          AutoSize = False
          Caption = 'Color of your own messages'
        end
        object NoticeColorLbl: TLabel
          Left = 16
          Top = 108
          Width = 265
          Height = 13
          AutoSize = False
          Caption = 'Color of received notices'
        end
        object ActionColorLbl: TLabel
          Left = 16
          Top = 136
          Width = 265
          Height = 13
          AutoSize = False
          Caption = 'Color of actions performed by users'
        end
        object JoinColorLbl: TLabel
          Left = 16
          Top = 164
          Width = 265
          Height = 13
          AutoSize = False
          Caption = 'Color of join/part/quit/topic/etc messages'
        end
        object InfoColorLbl: TLabel
          Left = 16
          Top = 192
          Width = 265
          Height = 13
          AutoSize = False
          Caption = 'Color of info messages from {AppName}'
        end
        object WarnColorLbl: TLabel
          Left = 16
          Top = 220
          Width = 265
          Height = 13
          AutoSize = False
          Caption = 'Color of warning messages'
        end
        object NormalColorBox: TColorBox
          Left = 288
          Top = 20
          Width = 137
          Height = 22
          Style = [cbStandardColors, cbExtendedColors, cbSystemColors, cbCustomColor, cbPrettyNames]
          ItemHeight = 16
          TabOrder = 0
        end
        object OthersColorBox: TColorBox
          Left = 288
          Top = 48
          Width = 137
          Height = 22
          Style = [cbStandardColors, cbExtendedColors, cbSystemColors, cbCustomColor, cbPrettyNames]
          ItemHeight = 16
          TabOrder = 1
        end
        object OwnColorBox: TColorBox
          Left = 288
          Top = 76
          Width = 137
          Height = 22
          Style = [cbStandardColors, cbExtendedColors, cbSystemColors, cbCustomColor, cbPrettyNames]
          ItemHeight = 16
          TabOrder = 2
        end
        object NoticeColorBox: TColorBox
          Left = 288
          Top = 104
          Width = 137
          Height = 22
          Style = [cbStandardColors, cbExtendedColors, cbSystemColors, cbCustomColor, cbPrettyNames]
          ItemHeight = 16
          TabOrder = 3
        end
        object ActionColorBox: TColorBox
          Left = 288
          Top = 132
          Width = 137
          Height = 22
          Style = [cbStandardColors, cbExtendedColors, cbSystemColors, cbCustomColor, cbPrettyNames]
          ItemHeight = 16
          TabOrder = 4
        end
        object JoinColorBox: TColorBox
          Left = 288
          Top = 160
          Width = 137
          Height = 22
          Style = [cbStandardColors, cbExtendedColors, cbSystemColors, cbCustomColor, cbPrettyNames]
          ItemHeight = 16
          TabOrder = 5
        end
        object InfoColorBox: TColorBox
          Left = 288
          Top = 188
          Width = 137
          Height = 22
          Style = [cbStandardColors, cbExtendedColors, cbSystemColors, cbCustomColor, cbPrettyNames]
          ItemHeight = 16
          TabOrder = 6
        end
        object WarnColorBox: TColorBox
          Left = 288
          Top = 216
          Width = 137
          Height = 22
          Style = [cbStandardColors, cbExtendedColors, cbSystemColors, cbCustomColor, cbPrettyNames]
          ItemHeight = 16
          TabOrder = 7
        end
      end
    end
    object GiftTab: TTabSheet
      Caption = 'giFT.'
      ImageIndex = 1
      DesignSize = (
        443
        363)
      object GiftLocalRadio: TRadioButton
        Left = 0
        Top = 76
        Width = 441
        Height = 17
        Anchors = [akLeft, akTop, akRight]
        Caption = 'Internal giFT'
        TabOrder = 2
        OnClick = rbtGiftModeChange
      end
      object GiftRemoteRadio: TRadioButton
        Left = 0
        Top = 220
        Width = 441
        Height = 17
        Anchors = [akLeft, akTop, akRight]
        Caption = 'Remote giFT'
        TabOrder = 4
        OnClick = rbtGiftModeChange
      end
      object GiftInfoStatic: TStaticText
        Left = 0
        Top = 40
        Width = 439
        Height = 33
        Anchors = [akLeft, akTop, akRight]
        AutoSize = False
        Caption = 
          'You can use {AppName} with an external giFT daemon. Do not chang' +
          'e anything here unless you know exactly what you are doing.'
        TabOrder = 1
      end
      object GiftCaptionPanel: TPanel
        Left = 0
        Top = 0
        Width = 441
        Height = 29
        Alignment = taLeftJustify
        Anchors = [akLeft, akTop, akRight]
        BevelOuter = bvLowered
        BorderWidth = 5
        Caption = 'giFT settings'
        Color = clGradientActiveCaption
        UseDockManager = False
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clCaptionText
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 0
      end
      object GiftRemoteGrp: TGroupBox
        Left = 0
        Top = 236
        Width = 441
        Height = 57
        Anchors = [akLeft, akTop, akRight]
        TabOrder = 5
        object GiftHostLbl: TLabel
          Left = 16
          Top = 24
          Width = 33
          Height = 13
          AutoSize = False
          Caption = 'Host'
        end
        object GiftPortLbl: TLabel
          Left = 248
          Top = 24
          Width = 19
          Height = 13
          Caption = 'Port'
        end
        object GiftHostEdit: TEdit
          Left = 54
          Top = 20
          Width = 171
          Height = 21
          Ctl3D = True
          ParentCtl3D = False
          TabOrder = 0
        end
        object GiftPortEdit: TEdit
          Left = 278
          Top = 20
          Width = 67
          Height = 21
          TabOrder = 1
        end
      end
      object GiftLocalGrp: TGroupBox
        Left = 0
        Top = 92
        Width = 441
        Height = 117
        Anchors = [akLeft, akTop, akRight]
        TabOrder = 3
        DesignSize = (
          441
          117)
        object OpenftSearchNodeLbl: TLabel
          Left = 16
          Top = 16
          Width = 409
          Height = 57
          AutoSize = False
          Caption = 
            'The OpenFT network needs a certain number of search nodes to fun' +
            'ction properly. If you have Windows 2000/XP, can spare about 6 k' +
            'byte/sec in both directions and usually keep {AppName} running f' +
            'or more than an hour please consider enabling this.'
          WordWrap = True
        end
        object OpenftSearchNodeChk: TCheckBox
          Left = 16
          Top = 84
          Width = 409
          Height = 17
          Anchors = [akLeft, akTop, akRight]
          Caption = 'Run as OpenFT search node (will take effect after restart).'
          TabOrder = 0
        end
      end
    end
    object GiftMappingTab: TTabSheet
      Caption = 'giFT.Mapping'
      ImageIndex = 5
      DesignSize = (
        443
        363)
      object GiftMappingCaptionPanel: TPanel
        Left = 0
        Top = 0
        Width = 441
        Height = 29
        Alignment = taLeftJustify
        Anchors = [akLeft, akTop, akRight]
        BevelOuter = bvLowered
        BorderWidth = 5
        Caption = 'Path mappings for remote giFT'
        Color = clGradientActiveCaption
        UseDockManager = False
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clCaptionText
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 0
      end
      object GiftMappingInfoStatic: TStaticText
        Left = 0
        Top = 40
        Width = 441
        Height = 29
        Anchors = [akLeft, akTop, akRight]
        AutoSize = False
        Caption = 
          'If you are running giFT on a remote host and have the completed/' +
          'incoming/shared directories on that host made available via samb' +
          'a/nfs/etc. {AppName} can use that to access the files.'
        TabOrder = 1
      end
      object GiftMappingInfo1Static: TStaticText
        Left = 0
        Top = 68
        Width = 441
        Height = 41
        Anchors = [akLeft, akTop, akRight]
        AutoSize = False
        Caption = 
          'For this to work you have to tell {AppName} how to map the paths' +
          ' reported by giFT to paths accessible via the file system. This ' +
          'is done by simply comparing the beginning of each path and repla' +
          'cing it if there is a match.'
        TabOrder = 2
      end
      object GiftMappingGrp: TGroupBox
        Left = 0
        Top = 120
        Width = 441
        Height = 241
        Anchors = [akLeft, akTop, akRight]
        Caption = 'Path Mappings'
        TabOrder = 3
        DesignSize = (
          441
          241)
        object MapLbl: TLabel
          Left = 16
          Top = 20
          Width = 318
          Height = 13
          Caption = 
            'Mapped Paths (evaluated from top to bottom, drag to change order' +
            ')'
        end
        object MapMatchLbl: TLabel
          Left = 16
          Top = 178
          Width = 65
          Height = 13
          AutoSize = False
          Caption = 'Match'
        end
        object MapReplacementLbl: TLabel
          Left = 16
          Top = 208
          Width = 63
          Height = 13
          AutoSize = False
          Caption = 'Replacement'
        end
        object MapListView: TListView
          Left = 16
          Top = 40
          Width = 409
          Height = 121
          Anchors = [akLeft, akTop, akRight]
          Columns = <
            item
              Caption = 'Path match'
              Width = 190
            end
            item
              Caption = 'Replacement'
              Width = 215
            end>
          DragMode = dmAutomatic
          HideSelection = False
          ReadOnly = True
          ParentShowHint = False
          ShowHint = False
          SmallImages = MainForm.FileImageList
          TabOrder = 0
          ViewStyle = vsReport
          OnDragDrop = MapListViewDragDrop
          OnDragOver = MapListViewDragOver
          OnSelectItem = MapListViewSelectItem
        end
        object MapReplacementEdit: TEdit
          Left = 88
          Top = 204
          Width = 249
          Height = 21
          Anchors = [akLeft, akTop, akRight]
          TabOrder = 2
        end
        object MapMatchEdit: TEdit
          Left = 88
          Top = 172
          Width = 249
          Height = 21
          Anchors = [akLeft, akTop, akRight]
          TabOrder = 1
        end
        object MapRemoveBtn: TButton
          Left = 350
          Top = 202
          Width = 75
          Height = 25
          Anchors = [akTop, akRight]
          Caption = 'Remove'
          TabOrder = 4
          OnClick = MapRemoveBtnClick
        end
        object MapAddBtn: TButton
          Left = 350
          Top = 170
          Width = 75
          Height = 25
          Anchors = [akTop, akRight]
          Caption = 'Add'
          TabOrder = 3
          OnClick = MapAddBtnClick
        end
      end
    end
  end
  object NavTree: TTreeView
    Left = 8
    Top = 8
    Width = 116
    Height = 386
    Anchors = [akLeft, akTop, akBottom]
    HideSelection = False
    Indent = 19
    ReadOnly = True
    RowSelect = True
    ShowButtons = False
    ShowLines = False
    ShowRoot = False
    TabOrder = 0
    OnChange = NavTreeChange
    OnDblClick = NavTreeDblClick
  end
end