Zitat von
simonko:
pitagoras
Zitat:
Mein Problem ist ich möchte alles in eine (zwei)?forschleife packen. für den punkt für dem die distanz ausgerechnet werdn soll kann ich einfach
string[i*2] und string[i*2+1] schreiben dann krieg ich genau. 0 1 2 3 4 5. das problem ist ich komme nicht auf die anderen indizis.
Für den nächsten / übernachsten Punkt musst du einfach den Index um 2 bzw. 4 erhöhen. Damit du nicht über das Arrayende hinausschießt, ermittelst du den Rest:
Delphi-Quellcode:
P1.X = [i * 2]
Y = [i * 2 + 1]
P2.X = [(i * 2 + 2) mod Length(string)]
Y = [(i * 2 + 3 [...]
P3.X = [(i * 2 + 4 [...]
Das wäre der nullbasierte Index, du musst ihn also noch um 1 inkrementieren.
PS: Der Plural von Index ist Indizes
.