c++ Builder 中如何调用Delphi的dll文件?(50分)

  • 主题发起人 主题发起人 elton
  • 开始时间 开始时间
假如有一个delphi的dll为dllex01.dll;它的一个导出函数为function test(str:PCHAR):PCHAR;
在cb里这样调用:
void __fastcall TForm1::Button1Click(TObject *Sender)
{
void* hd;
char* str;

hd = LoadLibrary("dllex01.dll");//获得DLL句柄
char* (*pf)(char*);
if(hd!=0)
pf = (char*(*)(char*))GetProcAddress(hd,"test");
//获得导出函数地址
if(pf!=NULL)
str = pf("abc");

MessageBox(NULL,str,str,0);
}
 
如果delphi中用到form窗体和数据库呢?
 
后退
顶部