Hola tengo lo siguiente:
Código Delphi
[-]
procedure TForm1.Button1Click(Sender: TObject);
var
formato:string;
cantDigitos:integer;
nro:integer;
begin
cantDigitos:=strToInt(Edit2.text);
nro:=StrToInt(Edit1.Text);
formato:='%0.' + intToStr(cantDigitos) + 'd';
Edit3.Text:=format(formato,[nro]);
end;
nro=15
Por ejemplo, cuando cantDigitos = 5, devuelve: 00015, y esto está bien.
Pero cuando cantDigitos es mayor a 16 devuelve: 15, yo quiero que devuelva el string con la cantidad de ceros que corresponda, por ejemplo: cantDigitos = 18, y devuelva: 000000000000000015, cosa que no sucede.
Quisiera saber que pasa, y si format no da para mas de 16 digitos que alguien me diga como resolver este problemita. Gracias.