Einzelnen Beitrag anzeigen

mjustin

Registriert seit: 14. Apr 2008
3.006 Beiträge
 
Delphi 2009 Professional
 
#2

AW: .self oder nicht (aus "SMTP über Strato")

  Alt 3. Jan 2023, 19:11
Der Hinweis bezieht sich vermutlich auf das erste Codebeispiel im ersten Beitrag, das so anfängt:

Delphi-Quellcode:
function TMailForm.SendeMail(MailEmpfaenger, CCListe, Betreff, Anhang :string; Body :TStringList; MailAbsender, MailPasswort, MailServer: String; MailPort: Integer) : boolean;
var
**iAttachment : TIdAttachment;
**Erfolg: Boolean;

begin
**(* Connect mit Server *)
**MailForm.IdSMTP1.AuthType := satDefault; // simpler Login ohne Authentifizierung
**MailForm.IdSMTP1.Host := MailServer;
**MailForm.IdSMTP1.Port := MailPort;

Und das sieht so aus als ob das gemacht wird, was man auf jeden Fall vermeiden sollte. (Zugriff innerhalb der Methode einer Form-Instanz auf die 'globale' Instanz-Variable)


Delphi-Quellcode:
procedure Verbinden;
begin
**Form1.IdSMTP1.AuthType := satDefault; // simpler Login ohne Authentifizierung
**Form1.IdSMTP1.Host := 'smtp.strato.de';
**Form1.IdSMTP1.Port := 465;
**Form1.IdSMTP1.UseTLS := utUseRequireTLS; // mit SSL -> Port dann in aller Regel 587
**usw.
Das ist anderer Code, eine Methode die nicht zur Form-Klasse gehört. Daher ist es hier richtig und notwendig, irgendwie auf die Form-Instanz zuzugreifen. Es sind zwei verschiedene Fälle.
Michael Justin
  Mit Zitat antworten Zitat