mein bisheriger Code:
Delphi-Quellcode:
procedure TForm1.btnEinloggenClick(Sender: TObject);
var
slText: TStringList;
begin
IdSMTP1.Host := 'smtpmail.t-online.de';
IdSMTP1.Username := 'EmailAdresse';
IdSMTP1.Password := 'EmailPasswort';
IdMessage1.Sender.Name := 'EmailAdresse';
IdMessage1.Sender.Address := 'EmailAdresse';
IdMessage1.From.Text := 'EmailAdresse';
IdMessage1.Sender.Text := 'EmailText';
IdMessage1.Recipients.EMailAddresses := 'EmailAdresse';
IdMessage1.Subject := 'Hallo Ich';
slText := TSTringList.Create;
slText.Add('Hier werden die Daten später stehen');
IdMessage1.Body := slText;
IdSMTP1.Connect;
try
IdSMTP1.Send(IdMessage1);
finally
IdSMTP1.Disconnect();
end;
slText.Free;
end;
scheppert bei:
IdSMTP1.Send(IdMessage1);
kommt aber weiterhin noch die selbe Fehlermeldung... -.- :X :X
zu
Hast Du im idMessage.Sender(..) eine gültige EMailadresse? (s.#4) : IdMessage.Sender erwartet ein TidAdressEMailItem...
Use the following properties to get or set the values for the TIdEMailAddressItem:
Sender.Text
Sender.Name
Sender.Address
die hab ich ja auch alle angegeben. Aber wie kann ich jetzte idMessage.Sender nen Wert zuweisen?
