Hallo zusammen,
ich nutze die
Indy SMTP-Komponente und möchte in einem Memo den Verbindungsstatus (Connect, Send und DisConnect) mit protokollieren.
Die
SMTP-Komponente hat ja die Eigenschaft OnStatus(). Nur weiß ich nicht wie ich diese für meinen Fall anwenden muss.
Delphi-Quellcode:
procedure TMain_Form.btn_EmailVersandClick(Sender: TObject);
Var
IdSMTP: TIdSMTP;
begin
...
if not Assigned(IdSMTP) then begin
IdSMTP := TIdSMTP.Create();
IdSMTP.Host := Trim(Emailoptionen_Form.edt_SMTP_Server.Text);
IdSMTP.Username := Emailoptionen_Form.edt_SMTP_AnmeldeName.Text;
IdSMTP.Password := Emailoptionen_Form.edt_SMTP_Password.Text;
IdSMTP.Connect;
Memo1.Lines.Add(IdSMTP.OnStatus(???????)); //hier weiß ich nicht weiter
end;
...
end;
Weiß hier jemand Rat wie ich in das Memo den Status reinbekomme? Meine Suche war bisher leider auch erfolglos.
Vielen Dank schon mal Vorab!