TFindComponent

[himitsu]

Wie viele ... gute Frage ... Vorspann, Anfang, Mitte und das EndGame?

Bezeichner, anstatt doofer Strings, sind eh besser, denn da meckert schon der Compiler, wenn es diese Komponente Variable nicht gibt.

Delphi-Quellcode:

//for var LV: TListView in [EarlyGame, EarlyMidGame, MidGame] do  // falls das mit der Typinferenz nicht funktioniert
for var LV in [EarlyGame, EarlyMidGame, MidGame] do
  LV.Items.Clear;

aber es gibt bestimmt noch Millionen andere Lösungen.

Delphi-Quellcode:

for var C in SellProductForm do
  if C is TListView then
    TListView(C).Items.Clear;

@Andreas: Bitte sag nicht, dass dieser Code innerhalb einer Methode von TSellProductForm liegt.