Entwickler-Ecke

Delphi Language (Object-Pascal) / CLX - If Abfrage


CyberStorm - Sa 11.01.03 16:59
Titel: If Abfrage
Hi,

Habe mal wieder eine Frage;

Ich habe folgenden Quellcode:

Quelltext 
1:
2:
3:
4:
5:
 
Tmp := DBLookUpComboBox2.KeyValue;
  If Tmp = DBLookUpComboBox3.KeyValue Then DBLookUpComboBox2.KeyValue := 0;
  If Tmp = DBLookUpComboBox4.KeyValue Then DBLookUpComboBox2.KeyValue := 0;
  If Tmp = DBLookUpComboBox5.KeyValue Then DBLookUpComboBox2.KeyValue := 0;
  If Tmp = DBLookUpComboBox6.KeyValue Then DBLookUpComboBox2.KeyValue := 0;


Kann man diese If Abfrage zu einer zusammenfassen. :?:
Sollte auch keine verschachtelte Abfrage werden.
Ich möchte sie mit 'or' Verknüpfen, aber es geht leider aus irgendeinem Grund nicht.

mfg
CyberStorm


UGrohne - Sa 11.01.03 17:08
Kann man, wahrscheinlich haste vergessen, die Klammern zu setzen:


Quelltext 
1:
2:
 
Tmp := DBLookUpComboBox2.KeyValue; 
 If (Tmp = DBLookUpComboBox3.KeyValue) OR (Tmp = DBLookUpComboBox4.KeyValue)  OR (Tmp = DBLookUpComboBox5.KeyValue) OR (Tmp = DBLookUpComboBox6.KeyValue) Then DBLookUpComboBox2.KeyValue := 0;


GRuß


CyberStorm - Sa 11.01.03 17:21
Hi,

Danke :D

mfg
CyberStorm


Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2026 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!