unit1.dfm

操作系统知识

object Form1: TForm1
  Left = 193
  Top = 107
  Width = 352
  Height = 156
  Caption = 'DDE 服务器端应用程序'
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'System'
  Font.Style = [fsBold]
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 16
  object Label1: TLabel
    Left = 8
    Top = 8
    Width = 291
    Height = 16
    Caption = '下面的字符串将发送到DDE的客户机端(&D):'
  end
  object Label2: TLabel
    Left = 8
    Top = 72
    Width = 134
    Height = 16
    Caption = '接收的回送数据(&B):'
  end
  object Edit1: TEdit
    Left = 8
    Top = 32
    Width = 329
    Height = 24
    TabOrder = 0
    Text = '121212121'
    OnChange = Edit1Change
  end
  object Edit2: TEdit
    Left = 8
    Top = 96
    Width = 329
    Height = 24
    TabOrder = 1
  end
  object DdeServerConv1: TDdeServerConv
    Left = 224
    Top = 64
  end
  object DdeServerItem1: TDdeServerItem
    ServerConv = DdeServerConv1
    Text = 'DDEServerItem test text'
    Lines.Strings = (
      'DDEServerItem test text')
    OnPokeData = DdeServerItem1PokeData
    Left = 256
    Top = 64
  end
end