G
gongjin21
Unregistered / Unconfirmed
GUEST, unregistred user!
我想调用在一个独立的单元文件中的函数myCheck
已经在主程序中
uses functionU;
这样子调用
if myCheck('asdfjfsdf') then
ShowMessage('对你输对了');
为什么不能用的呀？我在BCB中用include就OK了，在Delphi用了uses还不行，
哪里错了？先谢了各位哥们，帮帮忙
//下面是独立的单元文件fucntionU.pas
unit functionU;
interface
uses
SysUtils,winsock;
implementation
function myCheck(str : string) : boolean;
begin
if str='abc' then
result:=false
else
result:=true;
end;
已经在主程序中
uses functionU;
这样子调用
if myCheck('asdfjfsdf') then
ShowMessage('对你输对了');
为什么不能用的呀？我在BCB中用include就OK了，在Delphi用了uses还不行，
哪里错了？先谢了各位哥们，帮帮忙
//下面是独立的单元文件fucntionU.pas
unit functionU;
interface
uses
SysUtils,winsock;
implementation
function myCheck(str : string) : boolean;
begin
if str='abc' then
result:=false
else
result:=true;
end;