Oder per
TStringList.
Delphi-Quellcode:
var
sl: TStrings;
...
sl := TStringList.Create;
sl.Delimiter := ' ';
sl.DelimitedText := <Str mit Hausnummer>;
<hausnummer> := sl[sl.Count-1];
sl.Delete( sl.Count-1);
<str> := sl.Text;
..
sl.Free;
ich probiers erst mal so
EDIT: funktioniert (fast)einwandfrei.
die Leerzeichen zwischen den Strassennahmen die aus mehreren Wörtern bestehen werden eliminiert
ich danke euch