Hallo,
danke für Deine Antwort. Ich habe mir mal was zurecht gebastelt, leider bekomme ich eine Schutzverletzung:
Delphi-Quellcode:
procedure TTopic.Assign(Source: TPersistent);
begin
if Source is TTopic then
begin
Caption := TTopic(Source).Caption;
ID := TTopic(Source).ID;
end;
//inherited;
end;
Erkennst Du einen Fheler im Code?