Einzelnen Beitrag anzeigen

Benutzerbild von jim_raynor
jim_raynor

Registriert seit: 17. Okt 2004
Ort: Berlin
1.251 Beiträge
 
Delphi 5 Standard
 
#5

Re: FindComponent mit verschiedenen Variablen in einer Schle

  Alt 3. Mai 2005, 16:02
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.
Christian Reich
Schaut euch mein X-COM Remake X-Force: Fight For Destiny ( http://www.xforce-online.de ) an.
  Mit Zitat antworten Zitat