Nullen aus einem Memo entfernen

JungerIslaender · Verfasst: Di 11.12.07 15:12

Hi ich hab ein Memo feld und möchte das alle nullen aus den feld entfernt werden. Hab aber keine ahnung wie das geht. Dabei möchte ich aber nur die nullen entfernen aber nicht z.B. die nullen aus anderen Zahlen wie 100.

Vorher:
0
12
10
430
0

Nachher:
12
10
430

In meinem Memo stehen nur Zahlen vom Typ integer und in jeder neue Zeile eine neue Zahl.

Dunkel · Beiträge: 682 Mac OS X Snow Leopard Xcode 3.1

Hallo!

Iteriere über alle Lines des Memos und lösche die Zeilen welche nur eine 0 enthalten

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:

var
  i: word;
begin
  for i:= Memo1.Lines.Count-1 downto 0 do
    if Memo1.Lines[i] = '0' then
      Memo1.Lines.Delete(i);
end;

_________________
Ich streite einsam mich mit dieser Oberflächenwelt
Gutes sei ein löblich Brot von dem ich zehre - bis zum Tod [Das Ich - Im Ich]

JungerIslaender · Verfasst: Di 11.12.07 15:47

Klappt vielen dank!

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme