Delphi/CppBuilder

开发平台：

C++ Builder

MyServer.dfm：源码内容

							object ServerForm: TServerForm
  Left = 192
  Top = 107
  Width = 544
  Height = 297
  Caption = 'ServerForm'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 8
    Top = 0
    Width = 72
    Height = 13
    Caption = '发送给客户端'
  end
  object Label2: TLabel
    Left = 248
    Top = 0
    Width = 72
    Height = 13
    Caption = '从客户端接收'
  end
  object Memo1: TMemo
    Left = 8
    Top = 16
    Width = 233
    Height = 209
    Lines.Strings = (
      'Memo1')
    TabOrder = 0
    OnChange = Memo1Change
  end
  object Memo2: TMemo
    Left = 248
    Top = 16
    Width = 273
    Height = 209
    Lines.Strings = (
      'Memo2')
    TabOrder = 1
  end
  object Button1: TButton
    Left = 56
    Top = 240
    Width = 75
    Height = 25
    Caption = '发送数据'
    TabOrder = 2
    OnClick = Button1Click
  end
  object Button2: TButton
    Left = 424
    Top = 232
    Width = 75
    Height = 25
    Caption = '关闭 '
    TabOrder = 3
    OnClick = Button2Click
  end
  object DdeServerConv1: TDdeServerConv
    Left = 152
    Top = 120
  end
  object DdeServerItem1: TDdeServerItem
    ServerConv = DdeServerConv1
    OnPokeData = DdeServerItem1PokeData
    Left = 192
    Top = 120
  end
end

						