chatunit.dfm

来自「企业通comicq是一个通讯工具软件,一个通讯工具软件」· DFM 代码 · 共 65 行

object ChatForm: TChatForm
  Left = 309
  Top = 131
  ActiveControl = MsgMemo
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = '发送消息'
  ClientHeight = 254
  ClientWidth = 417
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = '宋体'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  PixelsPerInch = 96
  TextHeight = 12
  object StatusBar1: TStatusBar
    Left = 0
    Top = 0
    Width = 417
    Height = 25
    Align = alTop
    Panels = <
      item
        Width = 200
      end
      item
        Width = 50
      end>
    SimplePanel = False
  end
  object MsgMemo: TMemo
    Left = 0
    Top = 25
    Width = 417
    Height = 192
    Align = alTop
    TabOrder = 1
    OnKeyDown = MsgMemoKeyDown
  end
  object btnSend: TButton
    Left = 116
    Top = 224
    Width = 75
    Height = 25
    Caption = '发送'
    Default = True
    TabOrder = 2
    OnClick = btnSendClick
  end
  object btnCancel: TButton
    Left = 220
    Top = 224
    Width = 75
    Height = 25
    Cancel = True
    Caption = '取消'
    TabOrder = 3
    OnClick = btnCancelClick
  end
end