Delphi 2010 - TidHttp Post

Question

Je souhaite publier des données sur l'URL suivante:

http://mehratin.heroku.com/personals/new

J'écris le code suivant mais a un problème:

procedure TForm1.Button3Click(Sender: TObject);
var
  aStream: TMemoryStream;
  Params: TStringList;
begin
  aStream := TMemoryStream.Create;
  Params := TStringList.Create;
  try
    with IdHTTP1 do
    begin
      Params.Add('fname=123');
      Params.Add('lname=123');
      Request.ContentType := 'application/x-www-form-urlencoded';
      try
        Response.KeepAlive := False;
        Post('http://localhost:3000/personals/new', Params);
      except
        on E: Exception do
          showmessage('Error encountered during POST: ' + E.Message);
      end;
    end;

Comment puis-je publier des données par TidHttp.Post Méthode dans Delphi 2010?