Mehrere TImages in if-Vergleich kürzen

**DieDolly**

Kann man sowas hier irgendwie kürzer schreiben? Ich habe es schon mit einer Menge als Set versucht aber das klappt nicht.

markieren

Delphi-Quellcode:

			 if (TImage(Sender) = Rating1) or (TImage(Sender) = Rating2) or (TImage(Sender) = Rating3) or (TImage(Sender) = Rating4) or (TImage(Sender) = Rating5) then

  begin

**BerndS**

Wenn du allen Ratings einen Tag gibst, könntest du diesen prüfen.

**Uwe Raabe**

Ist nicht viel, aber man kann den Cast auf TImage weglassen:

markieren

Delphi-Quellcode:

			 if (Sender = Rating1) or (Sender = Rating2) or (Sender = Rating3) or (Sender = Rating4) or (Sender = Rating5) then

  begin

Mit etwas Aufwand wäre das hier eine Möglichkeit mit einer einmalig erzeugten Liste:

markieren

Delphi-Quellcode:

			  Ratings := TList<TObject>.Create;

  Ratings.AddRange([Rating1, Rating2, Rating3, Rating4, Rating5]);

und folgenden Abfragen:

markieren

Delphi-Quellcode:

			  if Ratings.Contains(Sender) then

  begin

**DieDolly**

Klappt wunderbar danke!

**completestranger**

Wenn es immer die gleiche Klasse ist und du auf den Namen verzichten kannst, dann würde es auch mit
if (Sender is TImage) then funktionieren.

Mehrere TImages in if-Vergleich kürzen

Mehrere TImages in if-Vergleich kürzen

AW: Mehrere TImages in if-Vergleich kürzen

AW: Mehrere TImages in if-Vergleich kürzen

AW: Mehrere TImages in if-Vergleich kürzen

AW: Mehrere TImages in if-Vergleich kürzen

Forumregeln

DieDolly Registriert seit: 22. Jun 2018 2.175 Beiträge	#1 Mehrere TImages in if-Vergleich kürzen 9. Mär 2022, 16:47 Kann man sowas hier irgendwie kürzer schreiben? Ich habe es schon mit einer Menge als Set versucht aber das klappt nicht. markieren Delphi-Quellcode: if (TImage(Sender) = Rating1) or (TImage(Sender) = Rating2) or (TImage(Sender) = Rating3) or (TImage(Sender) = Rating4) or (TImage(Sender) = Rating5) then begin
	Zitat

BerndS Registriert seit: 8. Mär 2006 Ort: Jüterbog 480 Beiträge Delphi 11 Alexandria	#2 AW: Mehrere TImages in if-Vergleich kürzen 9. Mär 2022, 17:14 Wenn du allen Ratings einen Tag gibst, könntest du diesen prüfen. Bernd
	Zitat

DieDolly Registriert seit: 22. Jun 2018 2.175 Beiträge	#4 AW: Mehrere TImages in if-Vergleich kürzen 9. Mär 2022, 17:36 Klappt wunderbar danke!
	Zitat

completestranger Registriert seit: 7. Okt 2018 25 Beiträge	#5 AW: Mehrere TImages in if-Vergleich kürzen 14. Mär 2022, 07:31 Wenn es immer die gleiche Klasse ist und du auf den Namen verzichten kannst, dann würde es auch mit if (Sender is TImage) then funktionieren.
	Zitat