• 全部

DELPHI 调用VC DLL 问题？

chinarouter 2004-12-19 02:18:00
在VC DLL 中声明如下：
extern _declspec(dllexport) __stdcall int GetUserInfo(char* SqlText,char* Result);

DELPHI中怎么来调用，是不是声明有错？？
...全文
114 点赞 收藏 8
写回复
8 条回复
切换为时间正序
当前发帖距今超过3年，不再开放新的回复
发表回复
shilinqun 2005-01-07
Result:pChar：Result是delphi的保留字。。。写代码时注意一下呀。。。
 回复 赞
cdsgajxlp 2005-01-07
都对
 回复 赞
beyondtkl 2005-01-06
怎麼發這麼多貼？
 回复 赞
客家族_祖仙教_小凡仙 2005-01-06
type
TGetUserInfo =Function （sqltxt:pChar;Result:pChar):integer;Stdcall;

Callproc();
var
DLLHand:THandle;
ResultStr:String;
GetUserInfo：TGetUserInfo ；
begin
DLLHand := LoadLibrary('DLL.dll');
if DLLHand<>nil then
@GetUserInfo := GetProcAddress(DLLHand,'GetUserInfo');
if @GetUserInfo <> nil then
GetUserInfo('Kao',pchar(ResultStr));
ResultStr:=String(ResultStr); // 好像要转换下才能有
ShowMessage(ResultStr);
end;
 回复 赞
客家族_祖仙教_小凡仙 2005-01-06
type
GetUserInfo = Function (sqltxt:pChar;Result:pChar):integer;Stdcall;
 回复 赞
客家族_祖仙教_小凡仙 2005-01-06
type
Function GetUserInfo(sqltxt:pChar;Result:pChar):integer;Stdcall;

Callproc();
var
DLLHand:THandle;
ResultStr:String;
begin
DLLHand := LoadLibrary('DLL.dll');
if DLLHand<>nil then
@GetUserInfo := GetProcAddress(DLLHand,'GetUserInfo');
if @GetUserInfo <> nil then
GetUserInfo('Kao',pchar(ResultStr));
ResultStr:=String(ResultStr); // 好像要转换下才能有
ShowMessage(ResultStr);
end;
 回复 赞
chinarouter 2004-12-19
Function GetUserInfo(sqltxt:pChar;Result:pChar):integer;Stdcall;External 'Dll.dll';

DELPHI中这样写，传不过去参数？？为何？？？
 回复 赞
chizengkun 2004-12-19
好象没错吧,这个也不是太熟,在delphi本身的调用有说明你可以看一下啦
 回复 赞
发帖
Windows SDK/API
创建于2007-08-02

1153

社区成员

2.2w+

社区内容

Delphi Windows SDK/API
申请成为版主
帖子事件
创建了帖子
2004-12-19 02:18
社区公告
暂无公告