Datamodule vererben

[Jelly]

Ich habe in einem Service ein Datenmodul liegen, in dem ich einige generelle Einstellung mache.

von diesem Datenmodul möchte ich nun weitere ableiten, mit ergänzender Funktionalität. Dazu sehe ich nur einen Weg, und zwar den über Datei->Neu->Weitere->MeinProjekt->MeinDatenmodul. In dieser Objektgalerie kann ich nur "Vererben" markieren.

Das klappt dann auch, nur hab ich alle Komponenten, die ich im Vatermodul drauf habe, nun natürlich auch hässlich auf meinem vererbten Modul.

Krieg ich die irgendwie weg ? Die brauchen nicht mehr da rumliegen, da dort keine Veränderungen mehr gemacht werden sollen.

[Union]

Irgendwie ist das doch der Sinn der Vererbung. Wenn Du "nur" das Datenmodul selber haben willst, dann solltest Du ein CustomDatanmodul anlegen ohne Komponenten. Und dann von diesem Deine anderen DM's ableiten. Welche "Einstellungen" willst Du denn dann vererben? Ein TDataModule hat ja eigentlich so gut wie keine Name, Tag, OnCreate, OnDestroy... Ich vermute Du willst Dir das mehrfache Schreiben des Create ersparen.

[Jelly]

Zitat von Union:

Welche "Einstellungen" willst Du denn dann vererben?

Naja, Eigenschaften nicht in dem Sinne, sondern ich will in meinen Abkömmlinge sämtliche Komponenten auf dem Datenmodul nutzen können (Queries, Stored Procedures etc.) Ich kenn den Sinn von Vererbung, und das, was ich eigentlich machen will, ist nichts anderes als von einem Datenmodul auf eine anderes referieren. Aber dachte das ginge auch anders.

Zitat von Union:

Ich vermute Du willst Dir das mehrfache Schreiben des Create ersparen.

Joo, ënnert aanerem och daat (Klengen Insidergag)

[Elvis]

Der Grund liegt einfach darin, dass in native Delphi sämtliche, vom Designer angelegte, Felder hässlicherweise published sind. Du hast keine Möglichkeit die sichtbarkeit zu begrenzen und warum sollte dir der Designer in der Ableitung keinen Zugriff auf alle Komponenten geben, die er sehen kann?