Ver Mensaje Individual
  #1 (permalink)  
Antiguo 26/11/2014, 18:03
adrian_
 
Fecha de Ingreso: abril-2010
Mensajes: 229
Antigüedad: 14 años
Puntos: 3
Format en Delphi

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