Thema: Delphi if abfrage vereinfachen

Einzelnen Beitrag anzeigen

BenjaminH

Registriert seit: 14. Okt 2004
Ort: Freiburg im Breisgau
713 Beiträge
 
Turbo Delphi für Win32
 
#5

Re: if abfrage vereinfachen

  Alt 3. Jul 2005, 19:36
Zitat von ferby:
  if (feldaktive[161]<>1) and (feldaktive[162]<>1) and (feldaktive[163]<>1) and (feldaktive[164]<>1) and (feldaktive[165]<>1) and (feldaktive[166]<>1) and (feldaktive[167]<>1) and (feldaktive[168]<>1) and (feldaktive[169]<>1) and (feldaktive[170]<>1) then
Sodala, ich hab nen bischen experimentiert und bin der meinung so funktioniert das auch:
if not(1 in [Feldaktive[161], Feldaktive[162],...]) Then
Benjamin
  Mit Zitat antworten Zitat