Wenn das immer in dem Format
15, Hauptstraße / NRW14 kommt, dann würde ich das hier nehmen
Delphi-Quellcode:
function GetHausnummer( Anschrift : string ): string;
var
PosKomma : integer;
begin
PosKomma := Pos( ',', Anschrift );
if PosKomma > 1
then
Result := copy( Anschrift, PosKomma - 1 )
else
Result := '';
end;
cu
Oliver
Kaum macht man's richtig - schon funktioniert's
Zertifikat: Sir Rufo (Fingerprint: ea 0a 4c 14 0d b6 3a a4 c1 c5 b9
dc 90 9d f0 e9 de 13 da 60)