一个已定义的函数，不会用使用，现场给分！

Question

函数这样子定义
function TSB100BPC.ConnectTcpip(dwMachineNumber: Integer; var lpszIPAddress: WideString; 
                                dwPortNumber: Integer; dwPassWord: Integer): WordBool;
begin
  Result := DefaultInterface.ConnectTcpip(dwMachineNumber, lpszIPAddress, dwPortNumber, dwPassWord);
end;
我这样子使用，却提示错误if ConnectTcpIp(5,'192.168.0.220',5005,0) then

Answer 1

var lpszIPAddress: WideString;這個要聲明一個變量，要將值傳回來的。

Answer 2

什么错误？设一个string变量，然后把这个变量当作lpszIPAddress参数。

Answer 3

var lpszIPAddress: WideString; 是传递类型的参数，所以用的时候用先声明一下一个wideString类型的参数

Answer 4

var
  addr:WideString;
begin
  addr := '192.168.0.220';
  if ConnectTcpIp(5,addr,5005,0) then
end;