home *** CD-ROM | disk | FTP | other *** search
/ Chip 2001 September / Chip_2001-09_cd1.bin / zkuste / irc / prog / virc97.exe / 0 / RCDATA / TDCCCHAT / TDCCCHAT.txt < prev   
Encoding:
Text File  |  2001-06-24  |  6.6 KB  |  283 lines

  1. object DCCChat: TDCCChat
  2.   Left = 242
  3.   Top = 247
  4.   Width = 563
  5.   Height = 440
  6.   Caption = 'DCC Chat'
  7.   Font.Charset = DEFAULT_CHARSET
  8.   Font.Color = clWindowText
  9.   Font.Height = -13
  10.   Font.Name = 'MS Sans Serif'
  11.   Font.Style = []
  12.   FormStyle = fsMDIChild
  13.   Icon.Data = {<image000.ico>}
  14.   Position = poDefault
  15.   Visible = True
  16.   OnActivate = FormActivate
  17.   OnClose = FormClose
  18.   OnCloseQuery = FormCloseQuery
  19.   OnCreate = FormCreate
  20.   OnResize = FormResize
  21.   OnShow = FormShow
  22.   PixelsPerInch = 120
  23.   TextHeight = 16
  24.   object WholePanel: TPanel
  25.     Tag = 31337
  26.     Left = 9
  27.     Top = 30
  28.     Width = 537
  29.     Height = 349
  30.     Align = alClient
  31.     BevelOuter = bvNone
  32.     BorderWidth = 2
  33.     Caption = 'WholePanel'
  34.     TabOrder = 0
  35.     object MainPanel: TPanel
  36.       Tag = 31337
  37.       Left = 2
  38.       Top = 2
  39.       Width = 533
  40.       Height = 313
  41.       Align = alClient
  42.       BevelOuter = bvLowered
  43.       BorderWidth = 2
  44.       TabOrder = 0
  45.       object Splitter1: TSplitter
  46.         Left = 3
  47.         Top = 153
  48.         Width = 527
  49.         Height = 3
  50.         Cursor = crVSplit
  51.         Align = alTop
  52.         Beveled = False
  53.       end
  54.       object tbRemote: TBestScroller
  55.         Left = 3
  56.         Top = 3
  57.         Width = 527
  58.         Height = 150
  59.         Align = alTop
  60.         Color = clWhite
  61.         Font.Charset = DEFAULT_CHARSET
  62.         Font.Color = clBlack
  63.         Font.Height = -13
  64.         Font.Name = 'MS Sans Serif'
  65.         Font.Style = []
  66.         ParentColor = False
  67.         ParentFont = False
  68.         PopupMenu = PopupMenu1
  69.         LazyWriteLimit = 4
  70.         HyperlinkColor = clBlue
  71.         OnMouseDown = tbRemoteMouseDown
  72.         OnMouseMove = tbRemoteMouseMove
  73.         OnMouseUp = tbRemoteMouseUp
  74.         OnVScroll = tbRemoteVScroll
  75.       end
  76.       object tbLocal: TBestScroller
  77.         Left = 3
  78.         Top = 156
  79.         Width = 527
  80.         Height = 154
  81.         Align = alClient
  82.         Color = clWhite
  83.         Font.Charset = DEFAULT_CHARSET
  84.         Font.Color = clBlack
  85.         Font.Height = -13
  86.         Font.Name = 'MS Sans Serif'
  87.         Font.Style = []
  88.         ParentColor = False
  89.         ParentFont = False
  90.         PopupMenu = PopupMenu2
  91.         LazyWriteLimit = 4
  92.         HyperlinkColor = clBlue
  93.         OnMouseDown = tbRemoteMouseDown
  94.         OnMouseMove = tbLocalMouseMove
  95.         OnMouseUp = tbLocalMouseUp
  96.         OnVScroll = tbLocalVScroll
  97.       end
  98.     end
  99.     object EntryPanel: TPanel
  100.       Left = 2
  101.       Top = 315
  102.       Width = 533
  103.       Height = 32
  104.       Align = alBottom
  105.       BevelOuter = bvNone
  106.       Caption = 'EntryPanel'
  107.       TabOrder = 1
  108.       object tbChatCommand: TWheelRichEdit
  109.         Left = 0
  110.         Top = 0
  111.         Width = 533
  112.         Height = 32
  113.         Align = alClient
  114.         PlainText = True
  115.         PopupMenu = ServerForm.PopupMenu2
  116.         TabOrder = 0
  117.         WordWrap = False
  118.         OnKeyDown = tbChatCommandKeyDown
  119.         OnKeyPress = tbChatCommandKeyPress
  120.         TargetControl = tbLocal
  121.       end
  122.     end
  123.   end
  124.   object StatusBar: TStatusBar
  125.     Left = 0
  126.     Top = 388
  127.     Width = 555
  128.     Height = 24
  129.     Panels = <>
  130.     SimplePanel = True
  131.   end
  132.   object ToggleToolbar: TPanel
  133.     Left = 5
  134.     Top = 5
  135.     Width = 8
  136.     Height = 8
  137.     Hint = 'Hide DCC chat toolbar|Click to hide the DCC chat toolbar'
  138.     BevelOuter = bvLowered
  139.     Color = clRed
  140.     ParentShowHint = False
  141.     ShowHint = True
  142.     TabOrder = 2
  143.     OnClick = ToggleToolbarClick
  144.   end
  145.   object DockTop: TDock97
  146.     Left = 0
  147.     Top = 0
  148.     Width = 555
  149.     Height = 30
  150.     object DCCChatToolbar: TToolbar97
  151.       Left = 0
  152.       Top = 0
  153.       Width = 41
  154.       Height = 30
  155.       Caption = 'DCC Chat toolbar'
  156.       DefaultDock = DockTop
  157.       DockedTo = DockTop
  158.       DockPos = 0
  159.       object pbAbort: TToolbarButton97
  160.         Left = 11
  161.         Top = 2
  162.         Width = 28
  163.         Height = 26
  164.         Hint = 'Close query|Close this query (private message) window'
  165.         Glyph.Data = {
  166.           F6000000424DF600000000000000760000002800000010000000100000000100
  167.           0400000000008000000000000000000000001000000010000000000000000000
  168.           800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  169.           FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  170.           3333333339999933333333399999999933333399337073999333399993000339
  171.           9933393999707333993399339993333339939933399033333993993333707333
  172.           3993993333101933399399333300099339933993330009993933399933000399
  173.           9933339993707339933333399999999933333333399999333333}
  174.         ParentShowHint = False
  175.         ShowHint = True
  176.         OnClick = pbAbortClick
  177.       end
  178.     end
  179.   end
  180.   object DockBottom: TDock97
  181.     Left = 0
  182.     Top = 379
  183.     Width = 555
  184.     Height = 9
  185.     Position = dpBottom
  186.   end
  187.   object DockLeft: TDock97
  188.     Left = 0
  189.     Top = 30
  190.     Width = 9
  191.     Height = 349
  192.     Position = dpLeft
  193.   end
  194.   object DockRight: TDock97
  195.     Left = 546
  196.     Top = 30
  197.     Width = 9
  198.     Height = 349
  199.     Position = dpRight
  200.   end
  201.   object BorderTimer: TTimer
  202.     Enabled = False
  203.     Interval = 500
  204.     OnTimer = BorderTimerTimer
  205.     Left = 264
  206.     Top = 4
  207.   end
  208.   object PopupMenu1: TPopupMenu
  209.     Left = 372
  210.     Top = 8
  211.     object ServerCut: TMenuItem
  212.       Caption = '&Cut'
  213.       Enabled = False
  214.     end
  215.     object ServerCopy: TMenuItem
  216.       Caption = 'C&opy'
  217.       OnClick = ServerCopyClick
  218.     end
  219.     object ServerPaste: TMenuItem
  220.       Caption = '&Paste'
  221.       Enabled = False
  222.     end
  223.     object N1: TMenuItem
  224.       Caption = '-'
  225.     end
  226.     object Logging: TMenuItem
  227.       Caption = '&Logging'
  228.       object LoggingEnabled: TMenuItem
  229.         Caption = '&Enabled'
  230.         OnClick = LoggingEnabledClick
  231.       end
  232.       object LoggingOptions: TMenuItem
  233.         Caption = '&Options ...'
  234.         OnClick = LoggingOptionsClick
  235.       end
  236.     end
  237.   end
  238.   object PopupMenu2: TPopupMenu
  239.     Left = 416
  240.     Top = 8
  241.     object MenuItem1: TMenuItem
  242.       Caption = '&Cut'
  243.       Enabled = False
  244.     end
  245.     object LocalCopy: TMenuItem
  246.       Caption = 'C&opy'
  247.       OnClick = LocalCopyClick
  248.     end
  249.     object MenuItem3: TMenuItem
  250.       Caption = '&Paste'
  251.       Enabled = False
  252.     end
  253.     object MenuItem4: TMenuItem
  254.       Caption = '-'
  255.     end
  256.     object MenuItem5: TMenuItem
  257.       Caption = '&Logging'
  258.       object MenuItem6: TMenuItem
  259.         Caption = '&Enabled'
  260.         OnClick = LoggingEnabledClick
  261.       end
  262.       object MenuItem7: TMenuItem
  263.         Caption = '&Options ...'
  264.         OnClick = LoggingOptionsClick
  265.       end
  266.     end
  267.   end
  268.   object KickTimerR: TTimer
  269.     Enabled = False
  270.     Interval = 500
  271.     OnTimer = KickTimerRTimer
  272.     Left = 336
  273.     Top = 4
  274.   end
  275.   object KickTimerL: TTimer
  276.     Enabled = False
  277.     Interval = 500
  278.     OnTimer = KickTimerLTimer
  279.     Left = 300
  280.     Top = 4
  281.   end
  282. end
  283.