PC World 2001 February/PCWorld_2001-02_cd.bin/Software/Vyzkuste/visirc/VIRC97.EXE/0/RCDATA/TQUERYFORM/TQUERYFORM.txt

Text File | 1998-09-02 | 8KB | 285 lines

object QueryForm: TQueryForm
  Left = 441
  Top = 231
  Width = 515
  Height = 374
  Caption = 'Query'
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsMDIChild
  Icon.Data = {<image000.ico>}
  Position = poDefault
  Visible = True
  OnActivate = FormActivate
  OnClose = FormClose
  OnCloseQuery = FormCloseQuery
  OnCreate = FormCreate
  OnResize = FormResize
  OnShow = FormShow
  PixelsPerInch = 120
  TextHeight = 16
  object WholePanel: TPanel
    Tag = 31337
    Left = 9
    Top = 39
    Width = 489
    Height = 298
    Align = alClient
    BevelOuter = bvNone
    BorderWidth = 2
    TabOrder = 0
    object tbQueryText: TBestScroller
      Left = 2
      Top = 2
      Width = 485
      Height = 262
      Align = alClient
      Color = clWhite
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -15
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentColor = False
      ParentFont = False
      PopupMenu = PopupMenu1
      LazyWriteLimit = 6
      HyperlinkColor = clBlue
      OnMouseDown = tbQueryTextMouseDown
      OnMouseMove = tbQueryTextMouseMove
      OnMouseUp = tbQueryTextMouseUp
      OnVScroll = tbQueryTextVScroll
    end
    object tbChatCommand: TRichEdit
      Left = 2
      Top = 264
      Width = 485
      Height = 32
      Align = alBottom
      PlainText = True
      PopupMenu = ServerForm.PopupMenu2
      TabOrder = 1
      WantTabs = True
      WordWrap = False
      OnKeyDown = tbChatCommandKeyDown
      OnKeyPress = tbChatCommandKeyPress
    end
  end
  object ToggleToolbar: TPanel
    Left = 5
    Top = 5
    Width = 8
    Height = 8
    Hint = 'Hide query window toolbar|Click to hide the query window toolbar'
    BevelOuter = bvLowered
    Color = clRed
    ParentShowHint = False
    ShowHint = True
    TabOrder = 1
    Visible = False
    OnClick = ToggleToolbarClick
  end
  object DockTop: TDock97
    Left = 0
    Top = 0
    Width = 507
    Height = 30
    object QueryToolbar: TToolbar97
      Left = 0
      Top = 0
      Caption = 'Query toolbar'
      DefaultDock = ChannelForm.DockBottom
      DockedTo = DockTop
      DockPos = 0
      TabOrder = 0
      object pbAbort: TToolbarButton97
        Left = 0
        Top = 0
        Width = 28
        Height = 26
        Hint = 'Close query|Close this query (private message) window'
        Glyph.Data = {
          F6000000424DF600000000000000760000002800000010000000100000000100
          0400000000008000000000000000000000001000000010000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          3333333339999933333333399999999933333399337073999333399993000339
          9933393999707333993399339993333339939933399033333993993333707333
          3993993333101933399399333300099339933993330009993933399933000399
          9933339993707339933333399999999933333333399999333333}
        ParentShowHint = False
        ShowHint = True
        OnClick = pbAbortClick
      end
    end
    object AttributesToolbar: TToolbar97
      Left = 41
      Top = 0
      Caption = 'Query attributes toolbar'
      DockedTo = DockTop
      DockPos = 41
      TabOrder = 1
      object BoldBtn: TToolbarButton97
        Left = 0
        Top = 0
        Width = 28
        Height = 26
        Hint = 'Bold'
        AllowAllUp = True
        GroupIndex = 1
        Glyph.Data = {
          BE000000424DBE0000000000000076000000280000000B000000090000000100
          040000000000480000000000000000000000100000001000000000000000BDBD
          BD00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00000000001FFFFFFFF110
          000011FFF11FFF10000011FFF11FFF10000011FFF11FFF10000011FFFFFFF110
          000011FFF11FFF10000011FFF11FFF10000011FFF11FFF1000001FFFFFFFF110
          0000}
        ParentShowHint = False
        ShowHint = True
        OnClick = BoldBtnClick
      end
      object UnderlineBtn: TToolbarButton97
        Left = 28
        Top = 0
        Width = 28
        Height = 26
        Hint = 'Underline'
        AllowAllUp = True
        GroupIndex = 2
        Glyph.Data = {
          CE000000424DCE0000000000000076000000280000000B0000000B0000000100
          040000000000580000000000000000000000100000001000000000000000BDBD
          BD00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00000000001FFFFFFFFF10
          00001111111111100000111FFFFF1110000011FF111FF110000011FF111FF110
          000011FF111FF110000011FF111FF110000011FF111FF110000011FF111FF110
          000011FF111FF11000001FFFF1FFFF100000}
        ParentShowHint = False
        ShowHint = True
        OnClick = UnderlineBtnClick
      end
      object ItalicBtn: TToolbarButton97
        Left = 56
        Top = 0
        Width = 28
        Height = 26
        Hint = 'Italic'
        AllowAllUp = True
        GroupIndex = 3
        Glyph.Data = {
          BE000000424DBE0000000000000076000000280000000F000000090000000100
          040000000000480000000000000000000000100000001000000000000000BDBD
          BD00C6C6C600FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00000000001FFFFFF11111
          1110111FFF11111111101111FFF11111111011111FFF11111110111111FFF111
          11101111111FFF11111011111111FFF11110111111111FFF111011111111FFFF
          FF10}
        ParentShowHint = False
        ShowHint = True
        OnClick = ItalicBtnClick
      end
      object ColourBtn: TToolbarButton97
        Left = 84
        Top = 0
        Width = 28
        Height = 26
        Hint = 'Text foreground and background colours'
        Glyph.Data = {
          2A010000424D2A010000000000007600000028000000120000000F0000000100
          040000000000B40000000000000000000000100000001000000000000000FFFF
          00007B007B00BDBDBD000000FF00FF00FF0000FFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00000000003FFF3FFF3333
          33333300000033F333F3333333333300000033FFFFF3FFFFF33333000000333F
          3F3F6E6E6FF333000000333FFF3F3F36E6EF330000003333F333F1F3F36F3300
          00003333F33F3F3F4FE6F300000033333FFF6E63F36EF30000003333F6E6E6E6
          3F36F30000003333FE3F3E6EF3FEF30000003333F6F2F3F33F36F30000003333
          FE3F3F5F6E6F3300000033333FE6E3F3E6F333000000333333FF6E6EFF333300
          000033333333FFFF333333000000}
        ParentShowHint = False
        ShowHint = True
        OnClick = ColourBtnClick
      end
    end
  end
  object DockLeft: TDock97
    Left = 0
    Top = 39
    Width = 9
    Height = 298
    Position = dpLeft
  end
  object DockRight: TDock97
    Left = 498
    Top = 39
    Width = 9
    Height = 298
    Position = dpRight
  end
  object DockBottom: TDock97
    Left = 0
    Top = 337
    Width = 507
    Height = 9
    Position = dpBottom
  end
  object DockTop2: TDock97
    Left = 0
    Top = 30
    Width = 507
    Height = 9
  end
  object BorderTimer: TTimer
    Enabled = False
    Interval = 500
    OnTimer = BorderTimerTimer
    Left = 264
    Top = 4
  end
  object PopupMenu1: TPopupMenu
    Left = 372
    Top = 4
    object ServerCut: TMenuItem
      Caption = '&Cut'
      Enabled = False
    end
    object ServerCopy: TMenuItem
      Caption = 'C&opy'
      OnClick = ServerCopyClick
    end
    object ServerPaste: TMenuItem
      Caption = '&Paste'
      Enabled = False
    end
    object N1: TMenuItem
      Caption = '-'
    end
    object Logging: TMenuItem
      Caption = '&Logging'
      object LoggingEnabled: TMenuItem
        Caption = '&Enabled'
        OnClick = LoggingEnabledClick
      end
      object LoggingOptions: TMenuItem
        Caption = '&Options ...'
        OnClick = LoggingOptionsClick
      end
    end
  end
  object KickTimer: TTimer
    Enabled = False
    Interval = 500
    OnTimer = KickTimerTimer
    Left = 228
    Top = 4
  end
  object tmswheel1: tmswheel
    OnIntelliScroll = tmswheel1IntelliScroll
    Left = 239
    Top = 174
  end
end