Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Coloboración Paypal con ClubDelphi

 
 
Herramientas Buscar en Tema Desplegado
  #2  
Antiguo 06-05-2010
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Poder: 38
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Hola Master23.

Tal como pones en el post no creo que se pueda incrementar códigos alfanuméricos desde la base de datos con un autoincremental.

Se me ocurre que lo podrías solucionar utilizando un campo alfanumérico y hacer el incremento por código antes de guardar.

Te pongo un ejemplo simple de como podrías implementarlo: (acorde al código de tu post)
Código:
function ProximoCodigo(CodAnt: string): string; // CodAnt= código leído de la BD
const
  NDIGIT = 5;  // parte numérica
  NCHAR = 3;  // parte alfanum.
var
  Prox: Integer;
begin
  // parte numerica + 1
  Prox:= StrToInt(Copy(CodAnt,NCHAR,Length(CodAnt)))+1;  
 // completar con ceros 
  Result:= Copy('00000',1,NDIGIT-Length(IntToStr(Prox)))+IntToStr(Prox); 
 // componer el código nuevamente
  Result:= 'A-'+Result;  
end;
Saludos.
__________________
Daniel Didriksen

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

Última edición por ecfisa fecha: 06-05-2010 a las 03:14:49.
Responder Con Cita
 



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
¿cómo aumentar el número de factura en una base de datos paradox ? Master23 Varios 2 09-04-2010 00:42:26
como puedo cambiar la fuente de Delphi - tipo de letra micky mouse Varios 6 07-03-2008 02:26:12
Como convertir numero entero en letra kurono Varios 2 23-01-2008 05:10:39
Convertir datos DBEdit tipo $ a numero destrukthor Varios 12 26-06-2006 16:35:51


La franja horaria es GMT +2. Ahora son las 12:11:38.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi