Nun ja, man kann's ja mal so machen:
(die Performance bei hohen Werten von n ist natürlich nicht so berauschend)
Delphi-Quellcode:
function IncrementWithMask2(
const Number, Mask:
string, n: Integer):
string;
begin
Result := Number;
while n > 0
do
begin
Result := IncrementWithMask(Result, mask);
Dec(n);
end;
end;