Ik heb nog een vraagje waar ik maar geen antwoord op kan vinden:
Regel 78 tot 84 toont alle hamburgers en hun voorraad in een memo. Dit gebeurt aan de hand van een loop. Stel dat je zou wensen dat bij de 1e klik je de hamburger in de memo te zien kreeg, bij de 2e klik, de eerste en de tweede en bij de 3e klik de memot werd leeggemaakt. Herschrijf de procedure... ? :-)
Alvast 1000x bedankt!Delphi Code:
procedure TForm1.Button6Click(Sender: TObject); var i:integer; begin memo1.clear; for i:=1 to 2 do memo1.lines.add(hamburgerlijst[i].naam + ' :' + inttostr(hamburgerlijst[i].voorraad)) end;
Bookmarks