chatfrm.dfm

工廠採購管理系統

object ChatClientForm: TChatClientForm
  Left = 248
  Top = 161
  Width = 543
  Height = 364
  BorderIcons = [biSystemMenu, biMaximize]
  BorderWidth = 3
  Caption = 'ZhaoSoft  Messenger'
  Color = clBtnFace
  Constraints.MinHeight = 322
  Constraints.MinWidth = 516
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  Position = poDesktopCenter
  ShowHint = True
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnDeactivate = FormDeactivate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  object Splitter1: TSplitter
    Left = 422
    Top = 0
    Width = 4
    Height = 324
    Align = alRight
  end
  object ChatPanel: TPanel
    Left = 0
    Top = 0
    Width = 422
    Height = 324
    Align = alClient
    BevelOuter = bvNone
    TabOrder = 0
    object Splitter2: TSplitter
      Left = 0
      Top = 150
      Width = 422
      Height = 3
      Cursor = crVSplit
      Align = alTop
    end
    object ListBoxChat: TListBox
      Left = 0
      Top = 0
      Width = 422
      Height = 150
      Style = lbOwnerDrawVariable
      Align = alTop
      Anchors = [akLeft, akTop, akRight, akBottom]
      BevelInner = bvLowered
      BevelKind = bkTile
      BevelOuter = bvNone
      BorderStyle = bsNone
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = []
      ItemHeight = 12
      ParentFont = False
      TabOrder = 1
      OnDblClick = ListBoxChatDblClick
      OnDrawItem = ListBoxChatDrawItem
      OnMeasureItem = ListBoxChatMeasureItem
    end
    object MemoChat: TMemo
      Left = 0
      Top = 180
      Width = 422
      Height = 103
      Align = alClient
      BevelInner = bvNone
      BevelKind = bkFlat
      BevelOuter = bvNone
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = []
      MaxLength = 1024
      ParentFont = False
      ScrollBars = ssVertical
      TabOrder = 0
      OnKeyDown = MemoChatKeyDown
      OnKeyUp = MemoChatKeyUp
    end
    object Panel3: TPanel
      Left = 0
      Top = 283
      Width = 422
      Height = 41
      Align = alBottom
      BevelInner = bvRaised
      BevelOuter = bvLowered
      TabOrder = 2
      DesignSize = (
        422
        41)
      object btnSendMsg: TSpeedButton
        Left = 324
        Top = 9
        Width = 89
        Height = 22
        Hint = #24555#25463#38190#20026'Ctrl+Enter '#65292#24191#25773#24555#25463#38190#20026'Ctrl+S'
        Anchors = [akTop, akRight]
        Caption = #21457#36865#28040#24687'(&S)'
        OnClick = btnSendMsgClick
      end
      object btnMsgModal: TSpeedButton
        Left = 9
        Top = 9
        Width = 89
        Height = 22
        Caption = #28040#24687#27169#24335'(&W)'
        OnClick = btnMsgModalClick
      end
      object btnHideNameList: TSpeedButton
        Left = 105
        Top = 9
        Width = 89
        Height = 22
        Caption = #38544#34255#21517#21333'(&N)'
        OnClick = btnHideNameListClick
      end
      object btnClose: TSpeedButton
        Left = 201
        Top = 9
        Width = 89
        Height = 22
        Hint = #38544#34255#26412#31383#21475
        Caption = #20851#38381#31383#21475'(&C)'
        OnClick = btnCloseClick
      end
    end
    object Panel2: TPanel
      Left = 0
      Top = 153
      Width = 422
      Height = 27
      Align = alTop
      BevelInner = bvRaised
      BevelOuter = bvLowered
      Color = clBackground
      Font.Charset = GB2312_CHARSET
      Font.Color = clWhite
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 3
      object LabelExpression: TLabel
        Left = 6
        Top = 7
        Width = 24
        Height = 12
        Caption = #34920#24773
      end
      object Expresstion: TComboBoxEx
        Left = 32
        Top = 2
        Width = 91
        Height = 22
        Hint = 'Ctrl+'#24038#21491#38190#36873#25321#34920#24773
        ItemsEx = <
          item
            Caption = #65288#26080#65289
            ImageIndex = 0
            SelectedImageIndex = 0
          end
          item
            Caption = #31505#33080
            ImageIndex = 1
            SelectedImageIndex = 1
          end
          item
            Caption = #24778#35766#30340#31505#33080
            ImageIndex = 2
            SelectedImageIndex = 2
          end
          item
            Caption = #30504#30524#31505#33080
            ImageIndex = 3
            SelectedImageIndex = 3
          end
          item
            Caption = #22256#24785#30340#31505#33080
            ImageIndex = 4
            SelectedImageIndex = 4
          end
          item
            Caption = #21741#27875#30340#33080
            ImageIndex = 5
            SelectedImageIndex = 5
          end
          item
            Caption = #28909#28872#30340#31505#33080
            ImageIndex = 6
            SelectedImageIndex = 6
          end
          item
            Caption = #22825#20351
            ImageIndex = 7
            SelectedImageIndex = 7
          end
          item
            Caption = #20445#23432#31192#23494
            ImageIndex = 8
            SelectedImageIndex = 8
          end
          item
            Caption = #20070#21574#23376
            ImageIndex = 9
            SelectedImageIndex = 9
          end
          item
            Caption = #24708#24708#35805
            ImageIndex = 10
            SelectedImageIndex = 10
          end
          item
            Caption = #19981#30693#36947
            ImageIndex = 11
            SelectedImageIndex = 11
          end
          item
            Caption = #32858#20250#31505#33080
            ImageIndex = 12
            SelectedImageIndex = 12
          end
          item
            Caption = #22256#20102
            ImageIndex = 13
            SelectedImageIndex = 13
          end
          item
            Caption = #21671#22068#31505#33080
            ImageIndex = 14
            SelectedImageIndex = 14
          end
          item
            Caption = #21520#33292#31505#33080
            ImageIndex = 15
            SelectedImageIndex = 15