Einen Type "in sich selbst verwenden"

[Stanlay Hanks]

Hallo zusammen! Erstmal muss ich mich für den Titel entschuldigen, aber das kann man nur schwer anders ausdrücken. Ich hab heute mal so aus Neugier etwas rumprobiert und bin dabei auf folgendes Problem gestoßen: Ich wollte gerne die "Struktur" eines erweiterten (PopUp) Menüs in einem Type "ausdrücken" (Ich hoffe, irgendwer versteht, was ich sagen will. Hab mich damit noch nicht allzu stark befasst ) und hab das so (nur mit den wichtigsten Einträgen als Beispiel) angefangen:

Delphi-Quellcode:

type TMMenuItem = record
     Caption : String;
     Width : Integer;
     Height : Integer;
     Parent : TMMenuItem; //Klappt nicht, weil TMMenuItem nicht "vollständig definiert ist"
     SubItems : Array of TMMenuItem; //Klappt natürlich auch nicht
end;

Hat jemand eine Idee, wie das gehen könnte? Ich möchte erreichen, dass sich diese einzelnen TMMenuItems sozusagen untereinander verbinden lassen. Also so, wie eben bei normalen Menus auch (Eintrag, Untereintrag, Untereintrag vom Untereintrag usw.) Ich weiß, dass es schlecht formuliert ist, aber wie gesagt, ich hab mich noch nicht richtig damit beschäftigt

Danke schon mal, Stanlay

[TheBender]

Das müsste Funzen;

Code:

type PMMenuItem= ^TMMenuItem;
     TMMenuItem = record
     Caption : String;
     Width : Integer;
     Height : Integer;
     Parent : TMMenuItem; 
     SubItems : Array of PMMenuItem;
     end;

[Stanlay Hanks]

Hi! Vielen Dank für die schnelle Antwort. Da ich mich, wie gesagt, so gut wie überhaupt nicht mit types etc auskenne, wäre es nett, wenn du mir erklähren könntest, was das, was du da geschrieben hast, genau bedeutet/was du genau gemacht hast Danke!

[TheBender]

Code:

type PMMenuItem= ^TMMenuItem; //Ein Pointer auf dein MenuItem
     TMMenuItem = record
     Caption : String;
     Width : Integer;
     Height : Integer;
     Parent : TMMenuItem; 
     SubItems : Array of PMMenuItem; //Ein Array von Pointern auf dein MenuItem
     end;

[Stanlay Hanks]

Vielen Dank! Jetz is der Groschen gefallen!
Ich hab nur noch bei Parent auch noch PMMenuItem geschrieben, dann gings auch schon super!

Man liest sich, Stanlay

[TheBender]

Hab ich übersehen