Ver Mensaje Individual
  #10  
Antiguo 06-09-2004
Avatar de roman
roman roman is offline
Moderador
 
Registrado: may 2003
Ubicación: Ciudad de México
Posts: 20.269
Reputación: 10
roman Es un diamante en brutoroman Es un diamante en brutoroman Es un diamante en bruto
Puedes usar algo como:

StringOfChar('0', 22 - Length(Dato)) + Dato

que devolverá una cadena de 22 caracteres (siempre y cuando Dato no tenga más de 22 caracteres) donde los espacios a la izquierda son llenados con ceros.

StringOfChar simplemente devuelve una cadena que repite un caracter el número especificado de veces. Si en tu versión de Delphi no existe esta función fácilmente puedes crearte una.

// Saludos
Responder Con Cita