[Delphi] While opdracht omzetten naar For Opdracht

[Boertje]

in een opdracht voor school (1e jaars inf.) moet ik deze code die met de While opdracht is geschreven, omzetten met gebruik van de For opdracht.
hier kom ik dus helemaal niet uit, ik heb al het 1 en het ander geprobeerd maar het wou dus niet echt lukken :(:

code:

procedure TForm1.btnLijstClick(Sender: TObject);
var
  iOndergrens,
  iBovengrens,
  iGulden,
  iStap: Integer;
  fEuro: Single;
  sRegel: String;
begin
  //Lees gegevens
  iOndergrens := StrToInt (edtOndergrens.Text);
  iBovengrens := StrToInt (edtBovengrens.Text);
  iStap := StrToInt (edtStap.Text);

  //maak tabel
  lstbxGuldenEuro.Clear;
  iGulden := iOndergrens;
  while iGulden <= iBovengrens
  do begin
     fEuro := 2.20371 * iGulden;
     sRegel := IntToStr (iGulden) + 'Gulden = '
     + FormatFloat ('0.00', fEuro) + 'Euro';
     lstbxGuldenEuro.items.Add (sRegel);
     iGulden := iGulden + iStap
  end

end;

[Paulstartrek]

post ook eens even wat je al geprobeert hebt.

tip: wat zegt je boek/delphi help over een For-lus misschien staat er zelfs een voorbeeld bij die lijkt op wat je hebt

[mulder]

en even hardop vertalen.
while doet ... totdat ... = ...
en
for doet ... vanaf ... tot ...

Hmmz. Ignore this.

[whoami]

Dit is gewoon een beetje logisch nadenken en wat manual werk.

Kijk in de help van Delphi hoe je een for-lus schrijft, en kijk dan eens naar je while. Die herschrijven naar een for is geen moeilijke opgave.


P&W is trouwens geen helpdesk.

Succes.