while mit 3 Bedingungen - Logik-Problem

[apm]

Hi!
Ich stell mich gerade zu glatt an was die Logik angeht. Ich habe eine while mit drei Bedingungen die ALLE erfüllt sein müssen bevor das Programm weiterspringen darf.

Delphi-Quellcode:

    while (i_arr_global_Ausgabe_Kat_Art_Schleifenwert <> Length(i_arr_global_Ausgabe_Kat_Art))
    and (i_arr_global_Ausgabe_Kat_Schleifenwert <> Length(i_arr_global_Ausgabe_Kat))
    and (i_arr_global_Ausgabe_Sehenswue_Schleifenwert <> Length(i_arr_global_Ausgabe_Sehenswue)) do
    begin
      ausgabe_i_arr_global_ausgabe_kat_art;
      ausgabe_i_arr_global_ausgabe_kat;
      ausgabe_i_arr_global_ausgabe_sehenswue;
    end;

Das sind jeweils Integer und Arrays. Ich bekomms nur hin, wenn ich eine der drei Sachen prüfen. Und verschachteln geht auf keinen Fall.