Question

我使用了TStringList和类似的东西：

geo: TStringList;
response: TStringStream;
  begin
  http:=tidhttp.Create(nil);
  try
    { TODO -oUser -cConsole Main : Insert code here }
    geo:=TStringList.Create;
    response:=TStringStream.Create('');
    geo.Add('name=stas');
    geo.Add('pass=431');
    s:=http.Get('http://test.me');
    writeln(http.ResponseText);
    writeln(s);
    s:=http.Post('http://test.me',geo,response);

但是出了点问题。例如，当我运行它时，警告[[DCC Error] consoleHttp.dpr(29): E2010 Incompatible types: 'string' and 'procedure, untyped pointer or untyped parameter']中的错误s:=http.Post('http://test.me',geo,response)。我做错了什么？

Answer 1

此错误表示您将错误的参数传递给方法TIdHTTP.post。这种方法有几个重载

function Post(AURL: string; ASource: TIdStrings): string; overload;
function Post(AURL: string; ASource: TIdStream): string; overload;
function Post(AURL: string; ASource: TIdMultiPartFormDataStream): string; overload;
procedure Post(AURL: string; ASource: TIdMultiPartFormDataStream; AResponseContent: TIdStream); overload;
procedure Post(AURL: string; ASource: TIdStrings; AResponseContent: TIdStream); overload;
procedure Post(AURL: string; ASource, AResponseContent: TIdStream); overload;

但没有与您传递的参数匹配。

Answer 2

这样做：

http.Post('http://test.me',geo,response);

而不是：

s:=http.Post('http://test.me',geo,response);

唯一匹配的方法是过程，但过程不返回值。错误消息表示您无法将过程分配给字符串。

Delphi错误E2010不兼容的类型：'字符串'和'过程，无类型指针或无类型参数'

2 个答案: