Aufsummieren im Record

[Jens Schumann]

Hallo,
ich habe ein kleines Beispiel gebastelt.
Ich lehne Records grundsätzlich ab. Deshalb basiert das Beispiel auf Objekten.
In der unit sum_impl.pas ist das Objekt für die Daten (TStreamNode) und das
Verwaltungsobjekt (TStreamNodes) deklariert.