[NumLock]

попробуй в Post передать еще AResponseContent: TStream и из него читать ответ. что-то типа:

Код:

var
  AStrings: TStrings;
  AStringStream: TStringStream;
begin
  AStrings:=TStringList.Create;
  AStringStream:=TStringStream.Create('');
...
  try
    IdHTTP1.Post('...', AStrings, AStringStream);
  finally
    ShowMessage(AStringStream.DataString);
  end;
end;