Deutsches Lazarusforum

Ha! Hervorragender Tipp! Danke schön!

Damit funktioniert das, wenn ich die letzte Zeile ausklammere, weil die irgendwie immer mit ner Leerzeile gefüllt wird und damit keinen Integerwert hergibt -.-

Weiteres Kuriosum: ich wollte den Counter kontrollieren, indem ich ihn mir in ein weiteres Memo ...

Ah, ok. Das erklärt auch gleich mein nächstes Problem: Wenn ich Preise unter einem bestimmten Wert löschen will, funktioniert das auch wieder nur manchmal..
Wie gehe ich denn richtig eine solche Liste durch und lösche bestimmte Zeilen, ohne mit dem Index durcheinander zu kommen?
Ich habe versucht ...

Moin moin, ich schreibe mir hier gerade ein kleines Programm, das 2 Fließtexte mit Waren bzw. deren Preise in Listen verwandelt und dann Waren mit negativen Preisen löschen soll.

Mein Code dafür:


text2 := Memo2.Text;
b := 1;

while length(text2) > 0
do begin
p := pos(',', text2); //Komma ...