function TIdTCPConnection.SendCmd(const AOut: string; const AResponse: array of
SmallInt): SmallInt;
begin
if AOut <> #0 then
begin
WriteLn(AOut);
end;
Result := GetResponse(AResponse);
end;
看到沒有,SendCmd調用Writeln的,而SendCmd是會等待對方的返回的,有返回值的函數,而Writeln是過程。