5,388
社区成员
发帖
与我相关
我的任务
分享run这个function的uses 里怎么声明?
本人的程序是这样的:
procedure TFormmain.Button2Click(Sender: TObject);
var
il_pinterface: Pointer;
il_ret: integer;
ls_p:pchar;
begin
il_pinterface := newinterfacewithinit('10.81.39.254', 8080, 'ProcessAll');
if (start(il_pinterface, 200017)<0) then exit;
ls_p:=StrAlloc(1024);
if (run(il_pinterface)<0) then
begin
getmessage(il_pinterface, ls_p);
showmessage(ls_p);
exit;
end;
end;
编译时
[Error] Unitmain.pas(64): Undeclared identifier: 'run'
procedure TFormmain.Button2Click(Sender: TObject);
var
il_pinterface: Pointer;
il_ret: integer;
ls_p:pchar;
begin
il_pinterface := newinterfacewithinit('10.81.39.254', 8080, 'ProcessAll');
if (start(il_pinterface, 200017)<0) then exit;
ls_p:=StrAlloc(1024);
if (run(il_pinterface)<0) then
begin
getmessage(il_pinterface, ls_p);
showmessage(ls_p);
exit;
end;
end;
编译时
[Error] Unitmain.pas(64): Undeclared identifier: 'run'
...全文
请发表友善的回复…
发表回复
fly9870 2003-10-22
- 打赏
- 举报
马甲上来接分！
tom20803862 2003-10-21
- 打赏
- 举报
newinterfacewithinit
start
getmessage
为自已dll的
start
getmessage
为自已dll的
tom20803862 2003-10-21
- 打赏
- 举报
在线等候!
cjfzy 2003-10-21
- 打赏
- 举报
解决了吗？接分吧
tiexinliu 2003-10-21
- 打赏
- 举报
来了就接吧 :)
zzh54zzh 2003-10-21
- 打赏
- 举报
我来了！！！！！！！
谢谢楼主^_^
谢谢楼主^_^
tom20803862 2003-10-21
- 打赏
- 举报
问题解决了,原来这个也是我自已DLL的function,谁来接分?
