من واقعا عذر می خوام . امکانش هست یه مثال در این مورد بزنید. آخه من حتی با این کد هم نتونستم اون پیام رو بگیرم.
ShowMessage(StreamToString(IdHTTPTest.Response.Con tentStream));
تابع استفاده شده هم اینه :
function StreamToString(aStream: TStream): string;
var
SS: TStringStream;
begin
if aStream <> nil then
begin
SS := TStringStream.Create('');
try
aStream.Position := 0;
SS.CopyFrom(aStream, aStream.Size);
Result := SS.DataString;
finally
SS.Free;
end;
end else
begin
Result := '';
end;
end;
اون فاصله بین con tentstream هم در برنامه وجود نداره اینجا اینجوری شده