|
Registriert seit: 28. Apr 2008
Ort: Stolberg (Rhl)
6.659 Beiträge
FreePascal / Lazarus
|
AW: String Problem
13. Sep 2011, 17:01
jemand ne Idee wie ich alles außer Zahlen 0-9 rausfiltere?
Delphi-Quellcode:
for i:=a to b do
if readln[i] in ['0'..'9'] then ATN:=ATN+readln[i]
else ATN:=ATN+' ';
oder so ähnlich
Gruß
K-H
p.s.
readln ist echt nicht so DER Name für eine Variable
Programme gehorchen nicht Deinen Absichten sondern Deinen Anweisungen
R.E.D retired error detector
|