Objekt an verketteter Liste hinzufügen.

[maximov]

Ich würde eher sagen, dass der fehler eine zeile höher liegt im constructor des channels:
Result := TChannel.Create; <-- da denn delphi ist manchmal mental schon ein bisschen weiter als der code ...Oder Self selbst ist ungültig.