Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Fehler bei while-Schleife (https://www.delphipraxis.net/79001-fehler-bei-while-schleife.html)

TurboMartin 14. Okt 2006 13:33


Fehler bei while-Schleife
 
Hi DP :hi: ,
Ich habe für eine while-Schleife: :lol:
Delphi-Quellcode:
  while (((z1[1] = z2[1]) or(z1[1] = z2[2])) and ((z1[2] = z2[1]) or(z1[2] = z2[2]))) or (z2[1] = (z2[2]) or ((z2[1] = 0) or (z2[2] = 0)) or ((z2[1] = 0) and (z2[2] = 0)) do
begin
  //Anweisungen
end;
Allerdings kriege ich am Ende der Bedingungen die Fehler:
Fehlermeldungen

[Error] *1.pas(*): Operator not applicable to this operand type
[Error] *1.pas(*): Operator not applicable to this operand type
[Fatal Error] *.dpr(*): Could not compile used unit '*1.pas'

Die erste Meldung bezieht sich auf das letzte or und die Zweite auf das do.
Aber weswegen bekomme ich die Fehler? Sind die Bedinngungen zu viel? :gruebel:

Jürgen Thomas 14. Okt 2006 13:39

Re: Fehler bei while-Schleife
 
Es fehlt eine schließende Klammer! Jürgen

bttb930 14. Okt 2006 13:40

Re: Fehler bei while-Schleife
 
zähl doch einfach mal die klammern - da ist eine zuviel

RWarnecke 14. Okt 2006 13:42

Re: Fehler bei while-Schleife
 
So sollte es gehen :

Delphi-Quellcode:
while (((z1[1] = z2[1]) or(z1[1] = z2[2])) and ((z1[2] = z2[1]) or(z1[2] = z2[2]))) or (z2[1] = z2[2]) or ((z2[1] = 0) or (z2[2] = 0)) or ((z2[1] = 0) and (z2[2] = 0)) do
begin
  //Anweisungen
end;

marabu 14. Okt 2006 14:06

Re: Fehler bei while-Schleife
 
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


Alle Zeitangaben in WEZ +1. Es ist jetzt 04:27 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz