Record mit procedure/function umschreiben

[myicq]

Hallo alle,

ich möchte gern eine Unit für FPC in mein D6 nutzen.

(https://raw.githubusercontent.com/sy.../jsontools.pas)

Leider habe ich da das Problem das angeblich D6 keine Funktionen/Prozeduren in Records unterstütze.

Delphi-Quellcode:

TJsonNodeEnumerator = record
  private
    FNode: TJsonNode;     // <<<< problem hier
    FIndex: Integer;
  public
    procedure Init(Node: TJsonNode);
end;

Kann ich das irgendwie umschreiben ? Eventuell eine "Class" nutzen ?

Bonusfrage: Ab wann wurde function / Method und Private/public in Records möglich ?

Danke

[mkinzler]

Statt Record Object
Das wird aber nichts das einzige Problem sein. In D6 gab s auch noch keine Unterstützung für JSON und viele Sparchfeatures, die u.U. benutzt wurden, gab es auch noch nicht.

[mensch72]

..."Bonusfrage: Ab wann wurde function / Method und Private/public in Records möglich ?"...

ab Delphi2007

[himitsu]

Oder die Methode als Procedure neben Record.

Zitat:

2007

War mir da auch erst nicht ganz sicher wann genau, aber es war auf jeden Fall erst nach D7, in der neuen Galileo-IDE, die es ab D2005/D2006 gab.

[dummzeuch]

Zitat von mensch72:

..."Bonusfrage: Ab wann wurde function / Method und Private/public in Records möglich ?"...

ab Delphi2007

Nein, schon ab Delphi 2006.

Ich habe damals sofort angefangen sie fuer nullable Types und Einheiten-behaftete Typen (Entfernung / Zeit / Geschwindigkeit) zu benutzen. Es war sowas wie eine Offenbarung.