Problem mit Uses-Klausel

[Medium]

Es ist auch üblich, dass man nicht alles und jeden aus der Uses-Hierachie "vererbt". Das wäre ja ein heilloses Durcheinander im Scope der letztendlichen Programme! Normal ist, dass man seine Klassen/Komponenten so designed, dass man über diese und ihrer Unit alle nötigen Aufgaben mit ihr erledigen kann.

Edit: Okay, den Spezialfall den Sir Rufo nennt gibt es auch. Das habe ich bisher aber meist nur im Zusammenhang mit DBControls gesehen, und ich persönlich würde diese Praxis auf einem absolut notwendigen Minimum halten. Zumal die Uses-Klauseln dadurch alles andere als übersichtlicher würden.

[philharmony]

Verstehe ich das richtig:

Units 'Lenkrad', 'Reifen', 'Felge', 'Getriebe', ... werden in unit 'Auto' benötigt. Wenn Ich jetzt 'Auto' benutzen möchte, dann muss ich auch alle dafür benötigten Unter-Units immer mit einbinden?

[stahli]

Nein, nur wenn Du auf aAuto.Lenkrad.Durchmesser zugreifen willst.
In dem Fall musst Du wissen, was ein Lenkrad ist und welche Eigenschaften das hat.

Alternativ kannst Du dem Auto aber auch eine Schnittstelle hinzufügen:
aAuto.Lenkraddurchmesser. Das könnte z.B. eine Funktion sein, die dann (intern) auf das Objekt TLenkrad zugreift.

[philharmony]

Aaaah, ok jetzt fällt die Rupie. Dh wenn ich zur Klasse 'Auto' ne Funktion 'GetLenkradDurchmesser' einfüge, dann kann ich das "Tunneln". Danke

[Sir Rufo]

Also so ganz ist das ja nicht

Delphi-Quellcode:

unit AutoTeile;

interface

type
  TLenkrad = class
    property Durchmesser : integer;
  end;

Delphi-Quellcode:

unit Auto;

interface

uses
  AutoTeile;

type
  TAuto = class
    property Lenkrad : TLenkrad;
  end;

Delphi-Quellcode:

unit MyMainUnit;

interface

uses
  Auto; // kennt nur Auto

var
  MeinAuto : TAuto;

// und doch geht der Zugriff auf

MeinAuto.Lenkrad.Durchmesser

[Medium]

Das ja, was aber nicht ginge ist:

Delphi-Quellcode:

unit MyMainUnit;

interface

uses
   Auto; // kennt nur Auto

var
   MeinAuto : TAuto;

MeinAuto.Lenkrad := TLenkrad.Create;

Da die Deklaration von TLenkrad fehlt. Memberzugriff geht immer, auch ohne das der Typ des Objekt-Feldes im Scope liegt. Nur die unmittelbare Verwendung dessen geht nicht. Ebenso geht auch z.B. das nicht:

Delphi-Quellcode:

uses
   Auto; // kennt nur Auto

var
   MeinAuto : TAuto;

MeinAuto := TMercedes.Create;

Um das zu realisieren gibt es mehrere Wege: Eine Factory, die eine Enummeration als Parameter erhält und anhand dessen ein Objekt des richtigen Typs liefert; das gleiche nur anders: In der Unit Auto müssten dann noch Dinge wie "TMercedesClass = class of TMercedes;" usw. deklariert werden, welche statt der Enummeration übergeben würden; eine String-Basierte Factory die einen Text-Parameter nimmt und anhand diesem unterscheidet, ... letztlich würde hier, wenn es um das Erzeugen eines spezifischen Autos geht, am ehesten aufs Factory-Pattern hinauslaufen. Fühlt sich für mich zumindest am "natürlichsten" an. Wie man dieser nun konkret sagt, was sie erzeugen soll, wäre dann wie o.g. sehr variabel. Da käme es dann auf den genauen Einsatz an, und wohl auch persönlichen Geschmack.


@Roter-Kasten-Rufo: Dass die VCL nicht der Gold-Standard der Best-Practices ist, weiss ich auch ;P

[Sir Rufo]

@Medium

[Blup]

Die Unit 'Parkhaus' muss die Klassen 'Ford', 'Audi' und 'VW' normalerweise auch nicht kennen.
Alle für Parkhaus benötigten Methoden und Eigenschaften sollten schon in der Basisklasse "Auto" deklariert sein. Die Implementierung der Methoden und die Werte der Eigenschaften können dann für jede abgeleitete Klasse unterschiedlich sein.

Wenn du auf Eigenschaften von Auto zugreifen möchtest deren Typen in 'Lenkrad', 'Reifen', 'Felge', 'Getriebe' deklariert sind, müssen die jeweiligen Units auch eingebunden werden.

[Sir Rufo]

Zitat von Medium:

Edit: Okay, den Spezialfall den Sir Rufo nennt gibt es auch. Das habe ich bisher aber meist nur im Zusammenhang mit DBControls gesehen, und ich persönlich würde diese Praxis auf einem absolut notwendigen Minimum halten. Zumal die Uses-Klauseln dadurch alles andere als übersichtlicher würden.

Diesen "Spezialfall" hast du bei 99% aller Komponenten (z.B. TButton, TEdit, etc.) und ist auch nur "speziell" bei installierten Komponenten aus der Komponentenpalette möglich, da es sich um ein "spezielles" Verhalten der IDE handelt

Und der TE fragte auch ganz "speziell" nach Komponenten.
(ist aber in diesem Zusammenhang aber eher nur eine Randnotiz wert, weil es eben IDE "speziell" ist)