Hola Foro
Tengo el siguiente problema no se por que no veo los ceros antes del nombre les dejo el código que encontre en Internet espero puedan ayudarme gracias.
label1.caption := FieldByName('REP').Value;
try
label4.Caption:=Format('%0.40s',[label1.caption]);
except
on EConvertError do
//Error
end;
En teoria deberia de imprimir algo como
0000000Nombredelcliente
