Versteckte Klasse entwickeln.

[Neutral General]

Zitat von Meflin:

Und wozu soll das gut sein? Damit trittst du die Hälfte von dem, wozu OOP gut ist, in die Tonne, weil man die abgeleiteten Objekte eben NICHT pauschal behandeln könnte.

Naja generell ist das soooo unsinnig nicht ( Information Hiding). Wenn es nur eine kleine Hilfsklasse für eine größere Klasse ist..

[Meflin]

Zitat von Neutral General:

Naja generell ist das soooo unsinnig nicht ( Information Hiding). Wenn es nur eine kleine Hilfsklasse für eine größere Klasse ist..

Ist bei dem Beispiel, worum es ja konkret geht (Körper, Würfel, Quader) definitiv nicht der Fall. Das tolle daran ist ja nun gerade, dass man für gewisse Dinge nicht iwssen muss, obs nun ein Würfel oder Quader ist. So wie er das implementieren will aber eben schon.

[Neutral General]

Oh ja.. das hatte ich überlesen...

Das kommt davon wenn man nur den ersten Satz liest

Das ist dann natürlich nicht im Sinne von OOP..

[Ralf Kaiser]

Zitat von Christian18:

gibt es in Delphi die Möglichkeit eine ganze Klasse zu verbergen? Ich habe davon gehört, dass man einzelne Methoden verbergen kann.

Leider kennt Delphi keine Attribute für Klassen (in VB.NET oder C# kann man Klassen als "private" markieren).

Die beste Entsprechnung dazu in Delphi wäre eine Klasse die im "implementation" Teil der Unit deklariert wird. Diese kann dann nur innerhalb dieser Unit benutzt werden. Wenn man selbst davon andere Klassen ableiten will gibt es allerdings Probleme. Verwendet man eine Forward-Deklaration wie hier:

Delphi-Quellcode:

uses
  classes, [.....];

type
  TDefault = class;
  TDefaultAbgeleitet = class(TDefault)
    procedure Test; override; // hier Compiler Fehlermeldung!!
  end;

implementation

type
  TDefault = class(TObject)
    procedure Test; virtual;
  end;

end.

Dann erhält man vom Compiler die Meldung, dass die Klasse TDefault noch nicht vollständig implementiert sei.

Ein "verstecken" von Klassen im implementation-Teil ist also nur dann machbar wenn man die Klasse nicht selbst erweitern will. (dazu müsste man im Beispiel die Forward-Deklaration weglassen und könnte keine "TDefaultAbgeleitet" deklarieren) Immerhin könnte man so lokale Klassen mit Hilfsroutinen erzeugen die ausserhalb der Unit nicht sichtbar sind.

Ciao,
Ralf

[himitsu]

Forward-Deklarationen müssen innerhalb eines zusammenhängendem Type-Blocks liegen.

also es darf zwischen den Forward-/Typen-Deklarationen nichts außer Typen sein
> keine Konstanten, Proceduren und auch kein Bereichswechsel ala implementation

[Phoenix]

In Delphi Prism geht das. Dort kann man eine Klasse als internal deklarieren und dann nur innerhalb dieses Assemblies verwenden.

[mkinzler]

Wenn du diese im Implementation Teil deklarierst, ist sie auch nur innerhalb der Unit sichtbar

[Cyf]

Was spricht dagegen, die Klasse in einer extra Unit zu deklarieren und diese einzubinden, nach außen dürfte diese dann, nicht sichtbar sein?