Obwohl du
OOP testen willst
empfehle ich dir den sogenannten
TPoint:
Delphi-Quellcode:
TPoint = record
X, Y : Integer;
end;
Aber ansonsten wäre nur das Delphi spezifische Attribut "
property" dort erwähnenswert.
Delphi-Quellcode:
TProperty =
class(TObject)
// Dies wird standardmäßig gesetzt, aber der besseren übersichtlichkeit halber schreibe ich immer "(TObject)" ;)
private
FAttribut : TAttributTyp;
procedure SetAttribut(Value : TAttributTyp);
function SetAttribut : TAttributTyp;
public // Wenn der Eintrag nicht im Objekt Inspektor erscheinen soll!
property Attribut : TAttributTyp
read FAttribut
write FAttribut;
property AttributProcs : TAttributTyp
read GetAttribut
write SetAttribut
published // Wenn der Eintrag im OI erscheinen soll
{ aus public hier rein kopieren }
end;
Ansonsten Delphi/
DP-Hilfe
MfG
xZise