Kruskal's Algorithmus - Minimum Spanning Tree

[Aphton]

Guten Morgen,
Da ich diesen Algorithmus hier in der DP oder sonst wo nicht finden konnte, habe ichs kurzerhand implementiert.

Im Anhang befindet sich eine kleine Demo Anwendung, in der man einen Graph bauen und den Algorithmus testen kann.
Wichtig sind folgende zwei Units:
aphtonGraph.pas
aphtonKruskal.pas

Ich habe in aphtonKruskal versucht, ein Howto-Use zu schreiben. Wenn es nicht hilft kann man sich an die Umsetzung in der Demo orientieren.

Wichtige Anmerkung, die mir gerade einfällt und im Quellcode nicht steht:
Bei der Kantenliste, die der Algorithmus zurückliefert, handelt es sich um keinen Kantenzug! Es ist ein Baum.
Weiters spielt die Reihenfolge der Kanten keine Rolle!