ZEIGER ! Eine Zeigerliste einer anderen anfügen.

[BluesKid]

Moin moin

is jetzt einfach mal ins Blaue:

Wahrscheinlich hast du doch zwei Variablen, die auf den Anfang der jeweiligen verketteten Liste Zeigen.

var Anfang1, Anfang2 : TPointerr //<-- der Anfang der Listen Die werden (so vermute ich mal) irgendwo in deinem Programm initialisiert... (????)

Dann muss du doch nur die Liste, an die angehängt werden soll bis zum Ende durchlaufen:

Delphi-Quellcode:

.
.
.

var hilfsZeig : TPointerr

begin

  hilfsZeig := Anfang1;

  while hilfsZeig^.next <> nil do
    hilfZeig := hilfZeig^.next;

und dann nur noch im Feld next den Anfang der zweiten Liste einsetzen:

Delphi-Quellcode:

  hilfsZeig^.next := Anfang2;

end;

Dann Zeigt jetzt Anfang1 auf eine Verkette Liste mit allen Elementen aus beiden Listen



schönen Gruß
Sam