FindComponent mit verschiedenen Variablen in einer Schleife?

[jim_raynor]

So würde ich es machen:

Delphi-Quellcode:

for i:=0 to 10 do
begin
  if StrToInt(Form1.Anzeige.Items[pl0]) mod 10)=0 then 
    Counter[i] := 0 
  else 
    Inc(Counter[i]) ; 
end;

Zur Info: mod ist der Rest einer Division. also 10 mod 10 ergibt 0, 11 mod 10 ergibt 1 usw.