2 array´s lesen

[himitsu]

Die Funktion nennt sich "Speichern", aber sie tut auch Lesen?
Da kann was nicht stimmen.

Und warum sind alle Variablen global?

Sollte nicht selbst ein uraltes Delphi 5 mit Warnungen um sich werfen?
So von Wegen "Result ist nicht initialisiert".

Was sollte nochmal das setWEGpos sein? Die Art des Aufrufs klingt hier aber auch wieder nach einem GET.

Irgendwie klingt das Ganze nach zwei Funktionen.
- GetWegPos(N): Intgeger
- dann nochmal eine Prozedur ohne irgendeinen Parameter, so ala "fülle alles mit Zufallswerten"