Forum: Object-Pascal / Delphi-Language
Delphi
by himitsu,
14. Nov 2008
OK stimmt, wenn man nur die 15 haben möchte, dann würde es so auch gehn :angel: (aber bei "15a" würde wieder was fehlen)
Forum: Object-Pascal / Delphi-Language
Delphi
by himitsu,
14. Nov 2008
Wenn die Hausnummer immer als Erstes steht und sich sonst nix Schlimmes davor befindet,
dann vielleicht so (incl. anhängender Buchstaben)
function GetFirstNumber(s : String) : String;
var
i : Integer;
begin
s := Trim(s);
i := 0;
while (i < Length(s)) and (s in ) do
inc(i);
Forum: Object-Pascal / Delphi-Language
Delphi
by himitsu,
14. Nov 2008
na erstmal suchst du dir die 1. Zahl und von da ausgehend suchst du nahch dem nächsten Nicht-Zahl-Zeichen und in diesem Bereich befindet sich die Zahl.
z.B. jeweil über 'ne Schleife suchen
if (s >= '0') and (s <= '9') then Zahl_gefunden...
// oder
if s in then Zahl_gefunden...
if (s < '0') or (s < '9') then keine_Zahl_mehr...