急急!delphi函数转换为PB函数形式,请看看啊!

[ansonboty]

function StartUp(cLocalIp: pchar; iLocalPort: integer; cSmgIp: pchar; iSmgPort: integer; cLoginName,cPassword: pchar;
lSocketTimeOut,lMTTimeOut,iSrcNode,lMTThread,lMaxListNode,lMTMaxRetryTime,lMOThread: integer;
deliver: TDeliver; report: TReport; bb,cc: pointer): integer;stdcall;external 'SGIP.DLL' name 'Startup';
请问如何做?TDeliver,TReport都是结构来的

[klbt]

不知道，帮你uo

[longdrang]

這是你自定義的函數還是引用的外部分函數?
external 'SGIP.DLL' name 'Startup';什么意思?
不懂delphi,呵呵!!!!

[incats]

pchar -> ref string
integer -> integer
pointer -> long
结构: 在PB里自已定义.

function integer Startup() library "SGIP.DLL"