引言: 其實有很多方法可以傳,利用本機的local端用Client-Server傳,但是有其他比較好的方法嗎??說實在我不太喜歡本機用local端(127.0.0.1)傳,有什麼方法可以讓兩個Form不開Socket的方式傳資料嗎??或是兩個Form互相Share資料等等 小弟才疏學淺,望請各位高手多多指教

willchen 你好:
請參考以下的做法
( >
    -- 
        

//---------------------------------------------------------------------------    #include 
#include 
#pragma hdrstop    #include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;    LPVOID MapFilePointer;
HANDLE hMapFile;
char *p;    //---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------    void __fastcall TForm1::Button1Click(TObject *Sender)
{
  // 存入共同區
  if (p) strcpy(p,Edit1->Text.c_str());
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button2Click(TObject *Sender)
{
  // 從共同區取出
  if (p) Edit1->Text = p;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::FormCreate(TObject *Sender)
{
  //取得′MyMappedFile′映象文件的控制碼
  hMapFile=OpenFileMapping(FILE_MAP_READ,true,"MyMappedFile");      //使用API函數來建立映象文件
  if (!hMapFile) hMapFile = CreateFileMapping((HANDLE)0xFFFFFFFF,NULL,PAGE_READWRITE,0l,1000l,"MyMappedFile");      if (hMapFile)
  {
  //MapViewOfFile函數返回一個指向共用記憶體塊的在該程式記憶體空間中有效的指標
    MapFilePointer=MapViewOfFile(hMapFile,FILE_MAP_ALL_ACCESS,0,0,0);
  }
  p = (char*)MapFilePointer;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::FormDestroy(TObject *Sender)
{
  UnmapViewOfFile(MapFilePointer);
  CloseHandle(hMapFile);
}
//---------------------------------------------------------------------------