da möchte doch auch nochmal meinen Senf beisteuern
ein netter Weg um Daten auf Klassenebene zu halten und auf Variablen auf Unitebene zu verzichten
sind typisierte Konstanten auf Ebene einer Klassenmethode. So implementiert ModelMaker zB den Singleton Pattern.
@luckie: Klassenmethode weglassen, wäre schade drum, dann hört dein
OOP Tutorial da auf wo es interessant wird.
Klassenmethoden sind
IMHO ein schönes Mittel für die Kapselung und natürlich für die
RTTI.
Probier doch mal das aus auf einem Formular mit Button und Listbox aus:
Delphi-Quellcode:
// alle Vorfahren ausgaben
procedure TForm1.Button1Click(Sender: TObject);
var
aClass : TClass;
begin
aClass := Sender.ClassType;
while Assigned(aClass) do
begin
Listbox1.Items.Add(aClass.Classname);
aClass := aClass.ClassParent;
end;
end;
Bernd