Pascal und Klassen

[Lernnix]

Zitat:

Turbo-Pascal ab 3.0 aufwärts konnte es. Dort war auch eine riesen Klassenbibliothek für Pseudo-Graphische Oberflächen dabei, TurboVision genannt. Wie schon gesagt: Vererbung war möglich, auch private, protected und public-Deklarationen gingen. Polymorphie, also Virtual-Methoden, ebenfalls. TurboVision wurde mit Quellcode geliefert, einige Demoprojekte waren auch dabei.

protected ging nicht. private in Kombination mit public ging ab Version 7. Objekte gingen ab Version 5.5. Es gab keine Properties. Stattdessen mussten Datenfelder verwendet werden. Für nur lesen gingen auch Funktionen.

Beispiel:

Delphi-Quellcode:

type
  TMyObject = object
    Ein_Datenfeld: Integer; //oder ein anderer passender Typ, je nach Aufgabe
    Noch_ein_Datenfeld: Real;
    constructor Init;       //auch Parameter durften hier übergeben werden
    destructor Done;        //Wie in Delphi OHNE PARAMETER
    function ValueOfAnotherField: Integer;
  private
    AnotherField: Integer;  
  end;

Alles vor private war public. Wenn man aber hinter der private Klausel die Klausel public verwendet hatte, konnten weitere public Methoden doeder Datenfelder folgen (ging ab Version 7.0) In Version 6 ging es nur so das zuerst alle öffentlicheen (public) Vereinbarungen (ohne public) angegeben werden mußten, dann mußten eingeleitet durch die private Klausel, alle privaten Vereinbarungen folgen. Vorher in Version 5.5 war alles öffentlich (public)

[OT]
Units gibt es seit Version 4. Vorher gingen nur Include Dateiein, die ins Hauptprogramm einzubinden waren.
[/OT]

Lernnix