unit1.cpp

操作系统知识

//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop

#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
  : TForm(Owner)
{
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Edit1Change(TObject *Sender)
{
  // 将Edit1组件中的内容发送向客户机端
  DdeServerItem1->Text=Edit1->Text;
}
//---------------------------------------------------------------------------

void __fastcall TForm1::DdeServerItem1PokeData(TObject *Sender)
{
  // 根据回传数据改变Edit2组件中的显示内容
  Edit2->Text=DdeServerItem1->Lines->Strings[0];  
}
//---------------------------------------------------------------------------