home *** CD-ROM | disk | FTP | other *** search
- object MDIChild: TMDIChild
- Left = 178
- Top = 421
- HorzScrollBar.Increment = 45
- HorzScrollBar.Visible = False
- VertScrollBar.Increment = 26
- VertScrollBar.Visible = False
- AutoScroll = False
- BorderIcons = [biSystemMenu, biMinimize]
- ClientHeight = 294
- ClientWidth = 538
- Color = clBtnFace
- Font.Charset = ANSI_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = []
- Menu = MainMenu1
- OldCreateOrder = False
- Position = poDefaultPosOnly
- PrintScale = poNone
- Scaled = False
- Visible = True
- OnActivate = FormActivate
- OnClick = FormClick
- OnClose = FormClose
- OnCloseQuery = FormCloseQuery
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- OnDeactivate = FormDeactivate
- OnMouseWheel = FormMouseWheel
- OnPaint = FormPaint
- OnResize = FormResize
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object ScrollBox1: TScrollBox
- Left = 0
- Top = 30
- Width = 538
- Height = 264
- HorzScrollBar.Smooth = True
- HorzScrollBar.Tracking = True
- VertScrollBar.Smooth = True
- VertScrollBar.Tracking = True
- Align = alClient
- BevelInner = bvNone
- BevelOuter = bvNone
- TabOrder = 0
- object PaintBox1: TPaintBox
- Left = 0
- Top = 0
- Width = 309
- Height = 155
- Color = clBtnFace
- ParentColor = False
- OnClick = FormClick
- OnDblClick = PaintBox1DblClick
- OnMouseDown = PaintBox1MouseDown
- OnMouseMove = PaintBox1MouseMove
- OnMouseUp = PaintBox1MouseUp
- OnPaint = PaintBox1Paint
- end
- end
- object SessTB: TToolBar
- Left = 0
- Top = 0
- Width = 538
- Height = 30
- BorderWidth = 1
- Color = clBtnFace
- EdgeBorders = [ebTop, ebBottom]
- Flat = True
- Indent = 5
- ParentColor = False
- ParentShowHint = False
- ShowHint = True
- TabOrder = 1
- Wrapable = False
- object ComboBox1: TComboBox
- Left = 5
- Top = 0
- Width = 145
- Height = 21
- Style = csDropDownList
- ItemHeight = 13
- TabOrder = 0
- TabStop = False
- OnClick = ComboBox1Click
- end
- object IFSButton1: TToolButton
- Left = 150
- Top = 0
- Hint = 'Increase font size'
- Caption = 'IFSButton1'
- ImageIndex = 19
- OnClick = Increasefontsize1Click
- end
- object DFSButton13: TToolButton
- Left = 173
- Top = 0
- Hint = 'Decrease font size'
- Caption = 'DFSButton13'
- ImageIndex = 18
- OnClick = DecreasefontSize1Click
- end
- object ToolButton5: TToolButton
- Left = 196
- Top = 0
- Width = 8
- Caption = 'ToolButton5'
- ImageIndex = 22
- Style = tbsSeparator
- end
- object ToolButton4: TToolButton
- Left = 204
- Top = 0
- Hint = 'Enable/Disable mouse input'
- AllowAllUp = True
- Caption = 'ToolButton4'
- Enabled = False
- Grouped = True
- ImageIndex = 21
- Style = tbsCheck
- OnClick = ToolButton4Click
- end
- object ToolButton2: TToolButton
- Left = 227
- Top = 0
- Width = 8
- Caption = 'ToolButton2'
- ImageIndex = 17
- Style = tbsSeparator
- end
- object PasteButton15: TToolButton
- Left = 235
- Top = 0
- Hint = 'Paste'
- Enabled = False
- ImageIndex = 2
- OnClick = PasteItemClick
- end
- object MarkButton12: TToolButton
- Left = 258
- Top = 0
- Hint = 'Mark'
- Enabled = False
- ImageIndex = 9
- Style = tbsCheck
- OnClick = Mark1Click
- end
- object CopyButton14: TToolButton
- Left = 281
- Top = 0
- Hint = 'Copy'
- Enabled = False
- ImageIndex = 1
- OnClick = CopyEnter1Click
- end
- end
- object SaveDialog1: TSaveDialog
- Filter = 'Any File (*.*)|*.*'
- Options = [ofHideReadOnly, ofPathMustExist, ofCreatePrompt, ofEnableSizing]
- Left = 424
- Top = 43
- end
- object MainMenu1: TMainMenu
- AutoHotkeys = maManual
- AutoLineReduction = maManual
- Left = 350
- Top = 59
- object Session1: TMenuItem
- Caption = 'Session'
- object FileNewItem: TMenuItem
- Caption = '&New Connection'
- Hint = 'Open new connection to the server'
- OnClick = FileNewItemClick
- end
- object N4: TMenuItem
- Caption = '-'
- end
- object UploadFile1: TMenuItem
- Caption = 'Upload File...'
- Hint = 'Upload file to the server'
- ImageIndex = 23
- OnClick = UploadFile1Click
- end
- object OpenTunnel1: TMenuItem
- Caption = 'Open C2S Tunnel...'
- Hint = 'Open tunneling interface for incoming connections'
- ImageIndex = 25
- OnClick = OpenTunnel1Click
- end
- object OpenS2CTunnel1: TMenuItem
- Caption = 'Open S2C Tunnel...'
- Hint = 'Open server tunneling interface for incoming connections'
- ImageIndex = 31
- OnClick = OpenS2CTunnel1Click
- end
- object N1: TMenuItem
- Caption = '-'
- end
- object Disconnect1: TMenuItem
- Caption = 'Disconnect'
- OnClick = Disconnect1Click
- end
- end
- object Edit1: TMenuItem
- Caption = '&Edit'
- Hint = 'Edit commands'
- object PasteItem: TMenuItem
- Caption = '&Paste'
- Hint = 'Paste|Paste'
- ImageIndex = 2
- OnClick = PasteItemClick
- end
- object Mark1: TMenuItem
- Caption = '&Mark'
- Hint = 'Mark'
- ImageIndex = 9
- OnClick = Mark1Click
- end
- object CopyEnter1: TMenuItem
- Caption = '&Copy'
- Hint = 'Copy'
- ImageIndex = 1
- ShortCut = 13
- OnClick = CopyEnter1Click
- end
- object N2: TMenuItem
- Caption = '-'
- end
- object Increasefontsize1: TMenuItem
- Caption = '&Increase Font Size'
- Hint = 'Increase font size'
- ImageIndex = 19
- OnClick = Increasefontsize1Click
- end
- object DecreasefontSize1: TMenuItem
- Caption = '&Decrease Font Size'
- Hint = 'Decrease Font Size'
- ImageIndex = 18
- OnClick = DecreasefontSize1Click
- end
- object N3: TMenuItem
- Caption = '-'
- end
- object SetFont1: TMenuItem
- Caption = 'Set &Font'
- Hint = 'Set active console font'
- ImageIndex = 20
- OnClick = SetFont1Click
- end
- end
- object View1: TMenuItem
- Caption = '&View'
- object Serverinfo1: TMenuItem
- Caption = 'Session &Info...'
- OnClick = Serverinfo1Click
- end
- object TunnelingState1: TMenuItem
- Caption = '&Tunneling Statistics...'
- Hint = 'View current tunneling state'
- ImageIndex = 24
- OnClick = TunnelingState1Click
- end
- object N9: TMenuItem
- Caption = '-'
- end
- object ResentSessions1: TMenuItem
- Caption = '&Servers'
- OnClick = ResentSessions1Click
- end
- end
- object Help1: TMenuItem
- Caption = '&Help'
- Hint = 'Help topics'
- object Contents1: TMenuItem
- Caption = '&Contents'
- OnClick = Contents1Click
- end
- object N10: TMenuItem
- Caption = '-'
- end
- object About1: TMenuItem
- Caption = 'About'
- OnClick = About1Click
- end
- end
- end
- object Timer1: TTimer
- Interval = 500
- OnTimer = Timer1Timer
- Left = 402
- Top = 150
- end
- object NewConnPM: TPopupMenu
- OnPopup = NewConnPMPopup
- Left = 343
- Top = 114
- end
- end
-