E-Mail-Client mit gefakter Adresse (Indy)

[MCXSC]

Hallo!

Ich habe einen kleinen E-Mail-Sender programmiert (mit Indy). Erst einmal der Code:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
with IdMsgSend do
begin
Body.Assign(Memo1.Lines);
From.Text := edfrom.text;
From.Name := edname.text;
Recipients.EMailAddresses := edto.text;
ReplyTo.EMailAddresses := edreplyto.text;
Subject := edbetreff.Text;
SMTP.Host := edhost.text;
SMTP.UserId := edid.text;
SMTP.Password := edpw.text;
SMTP.Connect;
try
SMTP.Send(IdMsgSend);
finally
SMTP.Disconnect;
end;
end;
end;

Wenn ich in das Feld "edname.text" (From.Name) einen Namen schreibe, wird dieser auch angezeigt. Allerdings geht es nicht mit From.Adress, dass ich irgendeine E-Mail-Adresse nennen kann.

Wenn ich in ReplyTo.EMailAddresses irgendeine Adresse schreibe, wird auch auf die Adresse geantwortet.

Doch wenn ich entweder in Form.Name oder Form.Text eine andere Adresse eintrage, als in SMTP.Host, dann kommt folgender Fehler:

"550 5.1.7 {mp018} <[e-mail]>... User is unknown."

Ich will ein "Anti-Spam" Programm schreiben, also z.B. für Gewinnspiele. Aber obwohl ich mich vorher doch eigentlich beim SMTP eingeloggt habe, geht das mit der E-Mail nicht...

Versteht jemand mein Problem und knn mir helfen?