目前因專案需要,必須使用NETDDE 在BCB的DDE元件並不支援 NETDDE 總是會出現對話框 所以想直接調用 DDE的API 不之有沒有人會使用

試試這個範例! 來源:http://rad.bytesandmore.de/index.htm?http://rad.bytesandmore.de/cpp/snipp/sc06011.php     //--------------------------------------------------------------------------- // Prüfen, ob Netscape (oder Internet Explorer) läuft und die  // aktuelle URL auslesen: //---------------------------------------------------------------------------    #include  TDdeClientConv* DDE = new TDdeClientConv(this); // Für Internet Explorer wird die SetLink() mit "IExplore" // statt "Netscape" aufgerufen if (DDE->SetLink("Netscape", "WWW_GetWindowInfo")) ShowMessage(DDE -> RequestData("0xFFFFFFFF, sURL, sTitle")); else ShowMessage("Netscape is not running"); if(DDE) delete DDE; =============================================================================== © '99-2001 by S. Kreutzmann

這裡還有一個範例 This example demonstrates how to use BCB3 to communicate with Creatures via DDE. Download Executable: http://www.angelfire.com/games2/nornlair/CCmdLine_exe.zip Download Source Code: http://www.angelfire.com/games2/nornlair/CCmdLine_Src.zip 參考網頁: http://www.angelfire.com/games2/nornlair/

Netscape冘RLt@C?n\狖r ================================================================ l:http://www1.ttcn.ne.jp/~kaneto/bcb/bcb.html    BCB4ABCB3沝deMan.pasoOADdeMan.pas姈equestData?          Move(pData, Result, len);          礒r         Move(pData^, Result^, len);     ?R?pC?Kv?Bi?A?Bj     //#include "Ddeman.hpp"        //BCB3                 #include  void __fastcall TMainForm::OpenNN(String asURL) { char* dummy; bool bSuccess=false; TDdeClientConv *dde = new TDdeClientConv(this); dde->ServiceApplication =NNFullPath; //netscapepX dde->SetLink("netscape", "WWW_Activate"); dummy=dde->RequestData("0xFFFFFFFF"); StrDispose(dummy); bSuccess=dde->SetLink("netscape", "WWW_OpenURL"); dummy=dde->RequestData(asURL ",,0xFFFFFFFF,0x3,,,"); StrDispose(dummy); dde->CloseLink(); delete dde; if(!bSuccess)WinExec(NNFullPath.c_str(),SW_SHOW); }

謝謝分享 感謝...