Hallo,

also ich versuche folgendes, was vom Prizip auch funktioniert (lässt sich ohne Fehler kompilieren):

zusammenfalten · markieren

Delphi-Quellcode:

unit Beispiel;

interface

type
  Record1 = record;
  Record2 = record;

  Record1 = record

  end;

  Record2 = record

  end;

implementation

end.

Nun das was stört. Sobald ich irgendwo (nach der Definition) die Entertaste betätige, wird ein zusätzliches end; eingefügt. Beispiel:

zusammenfalten · markieren

Delphi-Quellcode:

unit Beispiel;

interface

type
  Record1 = record;
  Record2 = record;

  Record1 = record

  end;

  Record2 = record

  end;

implementation
  end;

end.

Wie kann man das Abstellen?

Sobald ich jetzt noch Querverweise einfügen und kompiliere verabschiedet sich meine IDE ohne Fehlermeldungen. Beispiel:

zusammenfalten · markieren

Delphi-Quellcode:

unit Beispiel;

interface

type
  Record1 = record;
  Record2 = record;

  Record1 = record
    Rec2: Record2;
  end;

  Record2 = record
    Rec1: Record1;
  end;

implementation
  end;

end.

Bei der Definition von Klassen gibt es keine derartigen Probleme.

hast du schonmal einen Typ davon angelegt? Ich bezweifel dass, das dann richtig funktioniert. Denn laut der Definition ist es was endloses (In Record1.Record2.Record1.Record2.Record1.Record2... .....)
Also eigentlich supi das die IDE da rum spinnt.

Zitat von SirThornberry:

hast du schonmal einen Typ davon angelegt? Ich bezweifel dass, das dann richtig funktioniert. Denn laut der Definition ist es was endloses (In Record1.Record2.Record1.Record2.Record1.Record2... .....)
Also eigentlich supi das die IDE da rum spinnt.

Bei Klassen spinnt die IDE nicht rum, bei genau der gleichen Vorgehensweise.

Und für den Fall, das es nicht möglich ist einen entsprechenden Querverweis zu verwenden, warum wird das dann nicht als Fehler durch die IDE dargestellt? Ein sang- und klanloser Abschied ist nicht gerade die feine Art auf Fehler aufmerksam zu machen.

bei klassen klappt das weil eine Klasseninstanz nur ein Pointer auf daten ist. Und solange die Klasse nicht erzeugt wird wird auch die Unterklasse nicht erzeugt.

Du konntest die Crossreferenz durch Zeiger realisieren.

zusammenfalten · markieren

Delphi-Quellcode:

type
  pRec1 = ^Record1;
  Record1 = record;
  pRec2 = ^Record2;
  Record2 = record;

  Record1 = record
    Rec2: pRec2;
  end;

  Record2 = record
    Rec1: pRec1;
  end;

gibts diese Pointer denn überhaupt unter .NET?

Ja, es gibt sie. Und Delphi erlaubt sie glaub ich auch einfach so Dabei ist es unsafe-Code und sollte damit nicht verwendet werden

Zitat:

gibts diese Pointer denn überhaupt unter .NET?

Oh hatte ich überlesen.
In diesem Fall sollte er Klassen verwenden.

Ist die Frage dann nicht im falschen Bereich?

[OT]Die Frage ist im richtigen Bereich weil es hier darum geht das die IDE fehlerhafter weise ein "end" setzt.