broadcastunt.dfm

絮语2007视频聊天软件源程序.仅供参考

object broadcastfrm: Tbroadcastfrm
  Left = 274
  Top = 179
  BorderIcons = [biSystemMenu]
  BorderStyle = bsSingle
  Caption = '发送广播消息'
  ClientHeight = 222
  ClientWidth = 369
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = '宋体'
  Font.Style = []
  OldCreateOrder = False
  Position = poDesktopCenter
  OnCreate = FormCreate
  OnPaint = FormPaint
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Bevel1: TBevel
    Left = 8
    Top = 8
    Width = 353
    Height = 33
    Shape = bsFrame
  end
  object Label1: TLabel
    Left = 32
    Top = 16
    Width = 65
    Height = 13
    Caption = '发送到絮语'
    Transparent = True
    OnClick = Label1Click
  end
  object Label2: TLabel
    Left = 200
    Top = 16
    Width = 127
    Height = 13
    Caption = '发送Windows信使消息'
    Transparent = True
    OnClick = Label2Click
  end
  object RadioButton1: TRadioButton
    Left = 16
    Top = 16
    Width = 14
    Height = 17
    Checked = True
    TabOrder = 0
    TabStop = True
  end
  object RadioButton2: TRadioButton
    Left = 184
    Top = 16
    Width = 14
    Height = 17
    TabOrder = 1
  end
  object send_memo: TOLEEdit
    Left = 8
    Top = 48
    Width = 353
    Height = 137
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    HideSelection = False
    HideScrollBars = False
    Lines.Strings = (
      'send_memo')
    MaxLength = 1968
    ParentFont = False
    ScrollBars = ssVertical
    TabOrder = 2
  end
  object xpButton1: TxpButton
    Left = 184
    Top = 192
    Width = 75
    Height = 25
    Caption = '发送'
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = '宋体'
    Font.Style = []
    TabOrder = 3
    TabStop = True
    OnClick = xpButton1Click
  end
  object xpButton2: TxpButton
    Left = 264
    Top = 192
    Width = 75
    Height = 25
    Caption = '关闭'
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = '宋体'
    Font.Style = []
    TabOrder = 4
    TabStop = True
    OnClick = xpButton2Click
  end
end