Ähm... In deinem Code sind mehr Fehler drin, wie man in so wenig Zeilen überhaupt schreiben kann. Sorry
- Um deine For-Schleife fehlt ein begin...end
- Wieso erzeugst du sl1 zweimal
- Du lädst (vorausgesetzt die begin-end um die For-Schleife werden gesetzt) 10000 mal das Gleiche in sl1 rein?
- Mit Memo1.Text wird dein Memo1 jedesmal überschrieben, jedoch nie erweitert
Das sieht mir ziemlich einfach mal so dahingeklatscht aus. Beachte mal meine Punkte, und ich denke du wirst schon ein gutes Stück näher ans Ziel kommen.