wie Adresse auseinandernehmen

[mkinzler]

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;