Formatiert man das nicht immer in Blöcken zu vier Zeichen?
DE12 3456 7890 1234 5678 90
Das habe ich mal eine einfache Funktion gepackt.
Delphi-Quellcode:
const
cThinNoBreakSpace = #8239; // siehe https://de.wikipedia.org/wiki/Schmales_Leerzeichen
function FormatIBAN(AIBAN: string; AThinNonBreakSpace: Boolean = False): string;
var
I: Byte;
C: Char;
begin
Result := AIBAN;
if AThinNonBreakSpace then
C := cThinNoBreakSpace
else
C := #32;
for I := 1 to 5 do
Insert(C, Result, I * 5);
end;
Durch das schmale Leerzeichen wird wenig Platz verschwendet und es wird nicht umgebrochen.