Einzelnen Beitrag anzeigen

Benutzerbild von DeddyH
DeddyH

Registriert seit: 17. Sep 2006
Ort: Barchfeld
27.624 Beiträge
 
Delphi 12 Athens
 
#8

Re: Obekt-Erstellung funktioniert nicht

  Alt 5. Apr 2010, 01:17
Alles, was Du z.B. im OI im "linken" Reiter sehen kannst, sind Properties(Eigenschaften). Eine solche zu erstellen ist ganz einfach. Für Deinen Fall:
Delphi-Quellcode:
type
  TWuerfel = class
  private
    FAugen: integer; //privates Feld
    function GetAugen: integer; //Zugriffsmethode zum Auslesen (Getter)
  public
    property Augen: integer read GetAugen; //ReadOnly-Property, da kein write vorhanden
  end;

...

function TWuerfel.GetAugen: integer;
begin
  Result := FAugen;
end;
Statt nun explizit GetAugen aufrufen zu müssen, kannst Du nun über TWuerfel.Augen direkt auf die Eigenschaft zugreifen, der Rest läuft intern ab.
Detlef
"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen
  Mit Zitat antworten Zitat