RTTI - Properties setzen

[shmia]

Zitat von GuenterS:

das habe ich gemacht, allerdings ohne einen Erfolg zu erzielen.

War aber auch kein Fehler. Jetzt kannst du zunächst mal jeweils einen Konstruktor für TChef und TMitarbeiter schreiben und die Properties dort mal vorbelegen.

Delphi-Quellcode:

constructor TChef.Create; {override}
begin
   inherited;
   Titel := 'Oberboss, Stressmacher';
end;

Dann so weiter debuggen:

Delphi-Quellcode:

procedure Synchronize(aClass: TBaseClass); 
var 
  lBasisClass: TBasis; 
  lPropList: TPropList; 
  i: integer; 
begin 
  lBasisClass := aClass.Create; 
  ShowMessage('lBasisClass =Class('+lBasisClass.Classname+')');  // Klassenname anzeigen

Mit der Anzeige von Classname kannst du überprüfen, ob auch das erzeugt Objekt auch wirklich
zu der gewünschten Klasse gehört.