Hallo,
ich habe die folgende Klassen-/Unitstruktur:
Delphi-Quellcode:
---------------------
| TDatabaseInterface |
---------------------
(uses mytypes)
----------------------------------------------
| TPDObject |
----------------------------------------------
| |
----------------- --------------------
|TPDAnsprechpartner| | TPDauftrag | .....
----------------- --------------------
Ich möchte jede Klasse in einer einzelnen
Unit haben. Die Klasse 'TDatabaseInterface' muss die 'TPDObjects' von den jeweils spezielleren Klassen(Ansprechpartner, Auftrag,...)erzeugen.
Dafür muss ich jede dieser Unterklassen in die Uses-Klausel von 'TDatabaseInterface' aufnehmen.
Geht es irgentwie, dass ich die Klassen belasse wie sie sind und statt alles in die Uses-Klausel('TDatabaseInterface') zu schreiben die Deklaration mit in die
Unit MyTypes zu packen?
Ich hoffe ich habe mich verständlich gemacht?