mainform.dfm

来自「著名的SecureBlackBox控件完整源码」· DFM 代码 · 共 549 行 · 第 1/2 页

DFM
549
字号
object frmMain: TfrmMain
  Left = 187
  Top = 111
  Width = 833
  Height = 480
  Caption = 'SSH local port forwarding demo'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object pConnProps: TPanel
    Left = 0
    Top = 0
    Width = 209
    Height = 453
    Align = alLeft
    BevelOuter = bvNone
    TabOrder = 0
    object lblHost: TLabel
      Left = 8
      Top = 32
      Width = 26
      Height = 13
      Caption = 'Host:'
    end
    object lblPort: TLabel
      Left = 152
      Top = 32
      Width = 24
      Height = 13
      Caption = 'Port:'
    end
    object lblUsername: TLabel
      Left = 8
      Top = 80
      Width = 52
      Height = 13
      Caption = 'Username:'
    end
    object lblPassword: TLabel
      Left = 8
      Top = 128
      Width = 50
      Height = 13
      Caption = 'Password:'
    end
    object lblForwardedPort: TLabel
      Left = 8
      Top = 208
      Width = 79
      Height = 13
      Caption = 'Forwarded port:'
    end
    object lblDestHostAndPort: TLabel
      Left = 8
      Top = 256
      Width = 126
      Height = 13
      Caption = 'Destination host and port:'
    end
    object pSSHSettings: TPanel
      Left = 8
      Top = 8
      Width = 193
      Height = 17
      Caption = 'SSH connection settings'
      TabOrder = 0
    end
    object pForwardingSettings: TPanel
      Left = 8
      Top = 184
      Width = 193
      Height = 17
      Caption = 'Forwarding settings'
      TabOrder = 1
    end
    object editHost: TEdit
      Left = 8
      Top = 48
      Width = 137
      Height = 21
      TabOrder = 2
      Text = '192.168.0.1'
    end
    object editPort: TEdit
      Left = 152
      Top = 48
      Width = 49
      Height = 21
      TabOrder = 3
      Text = '22'
    end
    object editUsername: TEdit
      Left = 8
      Top = 96
      Width = 121
      Height = 21
      TabOrder = 4
      Text = 'user'
    end
    object editPassword: TEdit
      Left = 8
      Top = 144
      Width = 121
      Height = 21
      PasswordChar = '*'
      TabOrder = 5
    end
    object editForwardedPort: TEdit
      Left = 8
      Top = 224
      Width = 49
      Height = 21
      TabOrder = 6
      Text = '5001'
    end
    object editDestHost: TEdit
      Left = 8
      Top = 272
      Width = 137
      Height = 21
      TabOrder = 7
      Text = '127.0.0.1'
    end
    object editDestPort: TEdit
      Left = 152
      Top = 272
      Width = 49
      Height = 21
      TabOrder = 8
      Text = '5001'
    end
    object btnStart: TButton
      Left = 64
      Top = 320
      Width = 75
      Height = 25
      Caption = 'Start'
      TabOrder = 9
      OnClick = btnStartClick
    end
  end
  object pClient: TPanel
    Left = 209
    Top = 0
    Width = 616
    Height = 453
    Align = alClient
    BevelOuter = bvNone
    TabOrder = 1
    object splitterLogConns: TSplitter
      Left = 0
      Top = 302
      Width = 616
      Height = 3
      Cursor = crVSplit
      Align = alBottom
    end
    object pLog: TPanel
      Left = 0
      Top = 305
      Width = 616
      Height = 148
      Align = alBottom
      BevelOuter = bvNone
      TabOrder = 0
      object lvLog: TListView
        Left = 0
        Top = 0
        Width = 616
        Height = 148
        Align = alClient
        Columns = <
          item
            Caption = 'Time'
            Width = 100
          end
          item
            Caption = 'Event'
            Width = 480
          end>
        ReadOnly = True
        RowSelect = True
        SmallImages = imgLog
        TabOrder = 0
        ViewStyle = vsReport
      end
    end
    object lvConnections: TListView
      Left = 0
      Top = 0
      Width = 616
      Height = 302
      Align = alClient
      Columns = <
        item
          Caption = 'Host'
          Width = 100
        end
        item
          Caption = 'Incoming (socket)'
          Width = 85
        end
        item
          Caption = 'Outgoing (socket)'
          Width = 85
        end
        item
          Caption = 'Incoming (channel)'
          Width = 85
        end
        item
          Caption = 'Outgoing (channel)'
          Width = 85
        end
        item
          Caption = 'Socket state'
          Width = 70
        end
        item
          Caption = 'Channel state'
          Width = 70
        end>
      ReadOnly = True
      RowSelect = True
      SmallImages = imgConns
      TabOrder = 1
      ViewStyle = vsReport
    end
  end
  object Forwarding: TElSSHLocalPortForwarding
    CompressionLevel = 0
    ForceCompression = False
    SoftwareName = 'SSHBlackbox.4'
    Versions = [sbSSH2]
    OnAuthenticationFailed = ForwardingAuthenticationFailed
    OnAuthenticationSuccess = ForwardingAuthenticationSuccess
    OnError = ForwardingError
    OnKeyValidate = ForwardingKeyValidate
    Port = 0
    SocksAuthentication = saNoAuthentication
    SocksPort = 0
    SocksVersion = elSocks4
    WebTunnelPort = 0
    ForwardedPort = 0
    DestPort = 0
    SynchronizeGUI = True
    OnOpen = ForwardingOpen
    OnClose = ForwardingClose
    OnConnectionOpen = ForwardingConnectionOpen
    OnConnectionClose = ForwardingConnectionClose
    OnConnectionChange = ForwardingConnectionChange
    OnConnectionError = ForwardingConnectionError
    Left = 304
    Top = 64
  end
  object imgLog: TImageList
    Left = 257
    Top = 361
    Bitmap = {
      494C010102000400040010001000FFFFFFFFFF10FFFFFFFFFFFFFFFF424D3600
      0000000000003600000028000000400000001000000001002000000000000010
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?