Código Delphi [-] limite:= 15-length(Numero) while i< limite do begin Numero:= '0' + Numero; inc(i); end
limite:= 15-length(Numero) while i< limite do begin Numero:= '0' + Numero; inc(i); end
Código Delphi [-] Format('%.15d', Valor);
Format('%.15d', Valor);