Einzelnen Beitrag anzeigen

Benutzerbild von haentschman
haentschman

Registriert seit: 24. Okt 2006
Ort: Seifhennersdorf / Sachsen
5.388 Beiträge
 
Delphi 12 Athens
 
#3

AW: Zugriff auf Objekt in Klasse

  Alt 26. Dez 2020, 06:29
Moin...
Zitat:
dass der Compiler folgendes frisst ... Warum geht das ?
...und zur Laufzeit macht es Bummm!

Delphi-Quellcode:
TEmailCoreObject = CLASS(TObject)
  IMAPClient: TIdIMAP4;
...Felder einer Klasse werden immer mit F gekennzeichnet. Da liegt u.a. an einer Property...wenn man es braucht.
StyleGuide:
https://www.delphi-treff.de/object-pascal/styleguide/
Bitte denke auch ggf. an die Sichtbarkeiten...wenn benötigt.
http://docwiki.embarcadero.com/RADSt...assenelementen

Besser:
Delphi-Quellcode:
TEmailCoreObject = class
private
  
protected
  FIMAPClient: TIdIMAP4; // protected...weil das auch in der abgeleiteten Klasse nach Core verfügbar sein soll, oder?
public
  constuctor Create;
  destructor Destroy; override;
  property IMAPClient: TIdIMAP4 read FIMAPClient write FIMAPClient; // ggf. als property nach "Außen"
end;

...

constructor TEmailCoreObject.Create;
begin
  FIMAPClient := TIdIMAP4.Create;
end;

destructor TEmailCoreObject.Destroy;
begin
  FIMAPClient.Free;
  inherited;
end;

Geändert von haentschman (26. Dez 2020 um 07:37 Uhr)
  Mit Zitat antworten Zitat