很简单的问题：VC写的DLL，用Delphi调，怎么出错呢？？ (5分)

asphunter · 2003-03-24

VC写的DLL中的方法: char* myStrCopy(char* str1,char* str2) { char* tmp=""; strcpy(tmp,str1); return tmp; } Delphi调用方法: function myStrCopy(str1

char;str2

char)

char;stdcall;external 'testDLL.dll' name 'myStrCopy'; procedure TForm1.Button2Click(Sender: TObject); var   a,b,c

char; begin   a:='abc';   b:='123';   c:=myStrCopy(a,b);//执行到此步时出错，提示说：在testDLL.dll中的无效访问地址   showmessage(c); end;

死水 · 2003-03-24

char* myStrCopy(char* str1,char* str2) {   static char* tmp="";   strcpy(tmp,str1);   return tmp; }

Traveller · 2003-03-24

vc中也必须用WINAPI修饰符声明。

yanyandt2 · 2003-03-24

不错，这个WINAPI修饰，很多书都不讲

zw84611 · 2003-03-24

char*  _stdcall EXPORT myStrCopy(char* str1,char* str2) { } 另外对于stdcall的方式，还要修改VC工程目录中的.def文件 EXPORTS myStrCopy @1; Explicit exports can go here

asphunter · 2003-03-24

死水，你的方法还是报错。 我将VC中的方法改成下面的就正确了 char* myStrCopy(char* str1,char* str2) {     char* tmp="abc";     //strcpy(tmp,str1);     return tmp; } 好象是在调用VC里的strcpy函数时出的错，怎么解决呀？？？

yanyandt2 · 2003-03-24

你先把VC的写成exe的，没有错误时再改成dll形式

yhl1118 · 2003-03-24

可能要在字符串后面增加一个#0,我以前就是这样解决的，不过是c写的dll

52free · 2003-03-24

procedure TForm1.Button2Click(Sender: TObject); var   a,b,c

char; begin   a:=stralloc(50);;//声明为pchar类型的变量要先分配内存空间   b:=stralloc(50);   a:='abc'   b:='123';   c:=myStrCopy(a,b);//执行到此步时出错，提示说：在testDLL.dll中的无效访问地址   showmessage(c); end;

死水 · 2003-03-25

char* myStrCopy(char* str1,char* str2) {   char* tmp;   tmp=str1;   return tmp; }

asphunter · 2003-03-25

多人接受答案了。

很简单的问题：VC写的DLL，用Delphi调，怎么出错呢？？ (5分)

asphunter

Unregistered / Unconfirmed

死水

Unregistered / Unconfirmed

Traveller

Unregistered / Unconfirmed

yanyandt2

Unregistered / Unconfirmed

zw84611

Unregistered / Unconfirmed

asphunter

Unregistered / Unconfirmed

yanyandt2

Unregistered / Unconfirmed

yhl1118

Unregistered / Unconfirmed

52free

Unregistered / Unconfirmed

死水

Unregistered / Unconfirmed

asphunter

Unregistered / Unconfirmed

Similar threads