Forum: Object-Pascal / Delphi-Language
by Moombas,
9. Feb 2021
Ich hatte das ein wenig anders im Kopf bei meinem Hinweis aber in der Regel gibt es ja viele Wege nach Rom^^
Ungetestet aber das Prinzip müsste passen:
for x := 3 to iCount -1 do //Zeile 0 - 2 brauchen nicht durchlaufen zu werden, daher mit
begin
if x mod 3 = 0 then // Wenn durch 3 ohne Rest teilbar, etwas tun. Sonst einfach weiter. Nachteil: Jede Zeile wird abgelaufen
begin
...
Forum: Object-Pascal / Delphi-Language
by Moombas,
9. Feb 2021
Moin,
vom Prinzip bist du richtig. Schau mal hier: https://www.delphipraxis.net/59474-schleife-mit-schrittweite-step.html
Es gibt ja keine Step Anweisung, die kannst du dir aber mit einer for-Schleife und einer bzw. Zwei if (mit mod) Abfragen zusammenbasteln. Brauchst dann auch ggf. nur 1 Schleife für beide Prüfungen.