Einzelnen Beitrag anzeigen

Benutzerbild von Codewalker
Codewalker

Registriert seit: 18. Nov 2005
Ort: Ratingen
945 Beiträge
 
Delphi XE2 Professional
 
#1

Klassen allgemein "speichern"

  Alt 3. Apr 2010, 15:19
Ich gebe zu, der Titel ist nicht gelungen, aber mir ist nichts besseres eingefallen, was das Problem treffend beschreibt.
Im Prinzip möchte ich einen String einer Klasse zuordnen und das ganze z.B. in einem Array speichern.
Delphi-Quellcode:
String Klasse
F1 TAufgabe1
G3 TAufgabe2
H4 TAufgabe3
Ich möchte jetzt aus einer Textdatei die Kürzel auslesen und dann jeweils die zugehörige Klasse ermitteln und erstellen. Alle Klassen haben eine gemeinsame Vaterklasse (nennen wir sie TAufgabe). Wenn ich jetzt eine TAufgabe4-Klasse schreibe und das Kürzel mit der Klasse in das Array eintrage, möchte ich die Erstellungsroutine aber nicht ebenfalls anpassen müssen. Wie müsste diese Speicherung aussehen, damit ich quasi den Klassentyp merken kann und daraus ein neues entsprechendes Objekt erstellen kann?

(gar nicht so einfach zu beschreiben, ich hoffe man hat verstanden, worum es geht).

Edit: Okay, habe es so versucht:

TTaskAssoc = TDictionary<string, TClass>;

Davon wird ein Objekt erstellt und jede andere Klasse wird darin registriert mit Kürzel und Klassenreferenz. Problem ist jetzt das Erstellen (ich lese das Kürzel aus einer XML-Datei):
Task := TaskBase.TaskTypes.Items[Node1.Nodes[i].Attribute['Type']].Create; Da hagelt es jetzt "[DCC Fehler] E2010 Inkompatible Typen: 'TBaseTask' und 'TObject'. Aber es wäre fast das, was ich haben will
  Mit Zitat antworten Zitat