Agregar digitos - Foros Club Delphi

12-02-2015

ecfisa

Moderador

Registrado: dic 2005

Ubicación: Tres Arroyos, Argentina

Posts: 10.508

Poder: 38

Hola maxzama.

Tres opciones:

Código Delphi [-]var
  cad: string;
begin
  cad:= '12345';
  ShowMessage(
  {Opcion 1} StringOfChar('0', 11 - Length(cad)) + cad   + ' - ' +
  {Opcion 2} Format('%.11d',[StrToInt(cad)]) + ' - ' +
  {Opcion 3} Copy('00000000000', 1, 11 - Length(cad)) + cad
  );

Saludos

__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....

Última edición por ecfisa fecha: 12-02-2015 a las 20:10:07. Razón: Agregar opción

« Tema Anterior | Próximo Tema »

Herramientas	Buscar en Tema
Mostrar Versión Imprimible Enviar por Correo	Buscar en Tema: Búsqueda Avanzada
Desplegado
Cambiar a Modo Lineal Cambiar a Modo Hibrido Modo Hilado

Normas de Publicación
no Puedes crear nuevos temas no Puedes responder a temas no Puedes adjuntar archivos no Puedes editar tus mensajes El código vB está habilitado Las caritas están habilitado Código [IMG] está habilitado Código HTML está deshabilitado

Saltar a Foro

Temas Similares
Tema	Autor	Foro	Respuestas	Último mensaje
intercalar digitos	luisito2011	Varios	6	04-12-2012 18:38:57
Digitos en un INT	lmpadron	C++ Builder	9	15-08-2011 16:20:38
ingresar un int de 15 digitos en BD mysql	edr_tuc	SQL	4	07-02-2008 23:17:36
Ejercicio con Posiciones de dígitos	gerupc	Varios	19	18-08-2007 18:59:40
Ingresar un núm de 10 digitos...	coronado	Varios	1	12-10-2006 13:49:18

La franja horaria es GMT +2. Ahora son las 04:19:24.