Fehler bei while-Schleife

[marabu]

Ausgehend von Rolfs Ausdruck:

Delphi-Quellcode:

while (Z1[1] in [z2[1], z2[2]]) and (Z1[2] in [z2[1], z2[2]]) or (z2[1] = z2[2]) or ('0' in [z2[1], z2[2]]) do 
begin
end;

Grüße vom marabu