Formular über PHP senden klappt nicht

[mlspider]

Ich versuche wie folgt ein Formular zu versenden:

das PHP-Script:

Code:

 <?php 

 $admin = "[e-mail]"; 
 $subject = "PHP-Mail"; 
 $message = "Nachricht fuer $admin von $email:\n\n"; 

 while(list($name,$value)=each($HTTP_POST_VARS)) { 
 $message.="$name: $value\n\n"; 
 } 

 mail($admin,$subject,$message,"From: $email"); 

?>

Gefüllt und übergeben wird es wie folgt:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  data: TIdMultiPartFormDataStream;
begin
  data := TIdMultiPartFormDataStream.Create;
  try
    { add the used parameters for the script }
    data.AddFormField('email', Edit2.Text);
    data.AddFormField('name', Edit1.Text);
    data.AddFormField('message', Memo1.Lines.Text);

    { Call the Post method of TIdHTTP and read the result into TMemo }
    Memo1.Lines.Text := IdHTTP1.Post('http://www.meine-domain.de/formmailer.php', data);
  finally
    data.Free;
  end;
end;

So langsam verstehe ich überhaupt nichts mehr.

PS: Ich bin nicht gerade der PHP-Profi. Mehr der Dummy.

[edit=alcaeus]PHP-Code in code-Tags gewickelt Mfg, alcaeus[/edit]