Delphi-Quellcode:
type
TEdge =^PEdge;
PEdge = record
point1, point2: TPoints;
next_edge: TEdge;
end;
Also das verwirrt mich.
Du deklarierst einen Record mit einem P-Präfix, das eigentlich für Pointer-Typen reserviert ist. Du rückst bei der Record-Felddeklaration nicht ein, aber du rückst das end; am Ende der Record-Deklaration aus. Und dann Deklarierst du einen Pointertypen mit T-Präfix, das für "normale" Typen reserviert ist.
Kleiner Tipp: So siehts besser aus:
Delphi-Quellcode:
type
PEdge = ^TEdge;
TEdge = record
point1, point2: TPoints;
next_edge: PEdge;
end;