Aussondern von Zahlen aus einem String

skall · Beiträge: 38

und nocheinmal nabend

Also... Ich versuche aus einem String, der Aus Ziffern, Tab udn Leerzeichen besteht die Zahlen hintereinander raus zu ziehen und in einer Varriablen komplett abzuspeichern...

Sprich: 222 3 12 45
-> 22231245

gibts dazu iwie ne function?

delfiphan · Beiträge: 2684 Erhaltene Danke: 32

Mit StringReplace Leerzeichen mit Leerstrings ersetzen (?)

Hidden · Verfasst: Mo 26.01.09 23:13

Hi

Ich sehe das Problem nicht :nixweiss:

Mach doch einfach:

markieren

Delphi-Quelltext

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

var
  S: String;

//..
for i := 1 to Length(S) do begin
  if not (S[i] in [0..9]) then
    Delete(S, i, 1);
end;

Außerdem: www.delphi-forum.de/...hlight=delete+string

mfG,

_________________
Centaur spears can block many spells, but no one tries to block if they see that the spell is a certain shade of green. For this purpose it is useful to know some green stunning hexes. (HPMoR)

Xentar · Verfasst: Mo 26.01.09 23:27

Hidden hat folgendes geschrieben :

markieren

Delphi-Quelltext

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

var
  S: String;

//..
for i := 1 to Length(S) do begin
  if not (S[i] in [0..9]) then
    Delete(S, i, 1);
end;

Und wenn etwas gelöscht werden soll, immer rückwärts laufen

_________________
PROGRAMMER: A device for converting coffee into software.

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme