Records

[Delphi-Joe]

hallo,

weiß jemand von euch, wie ich Elemente in ein Record einfüge. Es soll aber mit Pointern(Zeigern) programmiert sein. Wäre genial, wenn ihr mir vieleicht den Code schicken könntet. Vielen Dank!

Gruß Julian

[Dax]

Erkläre dein Problem mal etwas genauer.. Was meinst du mit "Elemente sortiert einfügen"? Wenn es darum geht, dem Record zur Laufzeit deines Programms neue Felder zu verpassen: Das geht nicht.

[Delphi-Joe]

Ich möchte Daten (Elemente) zu einem Record hinzufügen. Jedoch sollen diese Daten nicht am Ende der Liste eingefügt werden, sondern am Anfang. Also vor alle anderen Elemente.

[Chris1986]

Hi
was meinst du genau?

Meinst du eine Liste, die mit Pointern realisiert wurde?

Delphi-Quellcode:

Type
  TListe = ^TL_Element;
  TL_Element = record
                 inhalt: string;
                 naechster: TListe; 
               end;

MfG
Christian

[Delphi-Joe]

Ja, das meine ich

[Chris1986]

Ok
Also,
zunächst brauchst du einen neuen Zeiger vom Typ TListe
var hilf: TListe Der Zeiger muss erstellt werden.
new(hilf) Anschließend weist du hilf, "worauf es zeigt", einen Wert zu
hilf^.inhalt := 'deinenString'; Damit dieses Element ganz vorne steht müssen alle anderen Elemente hinten dran gehangen werden:
hilf^.naechster := DeinenAlteListenVariable Das müsste es eigentlich schon gewesen sein.

MfG
Christian

[Delphi-Joe]

oh... ich habe vergessen zu schreiben, dass es sortiert eingefügt werden soll

[Chris1986]

Naja, Grundprinzip von wegen einfügen ist fast das gleiche.
Du musst mit einer Binärsuchen oder einen linearen Suche die Stelle finden, an der das Element eingefügt werden soll. An dieser Stelle teilst du die Liste. Dann erstellst du wie oben schon beschrieben eine neue Variable. Das letze Element aus dem ersten Teil der Schlange muss dann auf die neue Variable zeigen und die Variable selbst muss auf das erste Element der zweiten Hälfte zeigen.

MfG
Christian