CPP Routine (Schleifen) Übersetzung nach Delphi gesucht

[himitsu]

mit i ^= k; habe ich noch ein Problem, was sich so nicht 1:1 nach Delphi übersetzen lässt.

Es wird bereits in der WHILE-Bedingung ausgeführt also auch dann, wenn es FALSE liefert.

vermutlich müsste man das entweder in eine Funktion mit VAR-Parameter auslagern
oder einmal im While, für den Vergleich, und einmal in der Schleife mit := und auch nochmal nach der Schleife
oder vor der Schleife und nochmal in der Schleife
oder man löst das mit einem Repeat, bzw while True do und drinnen die Abbruchbedingung mit IF und BREAK.