Hi!
Ich erlaube mir, auf diese Frage zu Antworten:
Delphi-Quellcode:
{ Deine Klasse }
TMyLittleClass = class(TObject)
private
{ Interne Varablen }
FIntegerValue: Integer;
FStringValue: String;
function GetIncInteger: Integer; //Funktion, die das Resultat der Egenschaft liefert
{ Private-Deklarationen }
protected
{ Protected-Deklarationen }
public
{ Public-Deklarationen }
published
{ Eigenschaften ("Schnitstellen zu den Internen Variablen") }
property IntegerValue: Integer read FIntegerValue; //<-- Read-Only
property IncInteger: Integer read GetIncInteger; //<-- Read-Only
property StringValue: String read FStringValue write FStringValue; //<-- Read&Write
{ Published-Deklarationen }
end;