while not ... do

[Dax]

Mach es besser so:

Delphi-Quellcode:

while not ((Tformelobjekt(formellist[i]).operator = '^') OR (Tformelobjekt(formellist[i]).operator = 'Sq'))
   do inc(i);