delphi开发的标准动态库，为什么PB不能调用呢，请高手来指点一下了，急啊(40分)

H

hjp0214

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-09-30

• #1

function f_UserBargaingApply(Ywlx:ShortString;InDataPointer;out
OutDataChar;out retMsgChar ):Integer;stdcall;
在PB调用时，返回是乱码，把Pchar改为shortstring就可以。但是shortstring只有255个字符啊

 

L

lovewjp

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-09-30

• #2

返回的是字符串吗？改成WideString试试。

 

K

kk2000

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-09-30

• #3

function f_UserBargaingApply(Ywlx:ShortString;InDataPointer;out
OutDataChar;out retMsgChar ):Integer;stdcall;
修改为这样就可以了！
function f_UserBargaingApply(YwlxChar; InDataPointer; OutDataChar; retMsgChar ):Integer;stdcall;
PChar 是指针不用out 的;

调用的是时候PB 的定义是： String Ywlx;
Ywlx = space(100); //看具体情况分配空间啊

 

H

hjp0214

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-09-30

• #4

在PB怎么定义动态库函数啊

 

K

kk2000

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-09-30

• #5

静态定义就可以了！！

 

鳄

鳄鱼先生

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-09-30

• #6

你找一个PB类型和Delphi类型的对比表.

 

H

hjp0214

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-09-30

• #7

function f_test(OutDataChar):Integer;一个简单的动态库函数，在PB就是没有返回值，
显示OutData时，就是空的，为什么
PB申明
function int f_test(ref string OutData) LIBRARY "ZRHosJK.dll"

 

H

hjp0214

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-09-30

• #8

怎么样在delphi写标准的动态库函数，可以在所有语言中调用呢？

 

H

hjp0214

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-10-21

• #9

多人接受答案了。