Foros Club Delphi - Como puedo hacer esto

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)

- Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)

- - Como puedo hacer esto (https://www.clubdelphi.com/foros/showthread.php?t=68411)

stynpy29

11-06-2010 19:56:44

Poner un Id configurado personal

Hola amigos resulta que tengo una tabla de pedidos en access y me piden que cuando mi tabla en un formulario en access en el campo donde aparece numero de pedido aparesca este Id "2010-000000" y cuando se capture el primer registro se valla incrementando asi "2010-000001" y asi sucesivamente espero me auxilien y de antemano gracias.

P.D. Uso access 2003

Caral

11-06-2010 20:36:51

Hola
Yo separaria los dos:
2010 campo date
000000 campo integer autoincremento
y concateno el resultado mas el - de regalo en el centro.
Facil, util, sin complicaciones etc. etc.....
No se, digo....
Saludos

rufo	11-06-2010 20:40:35

Como puedo hacer esto

Hola amigos resulta que me pidieron que hiciera un programa en el cual es de pedidos y que en el campo donde tiene que ir el numero de pedido que salga asi "2010-000000" y que cada vez que yo almacene el pedido se vaya incrementando el numero de pedido asi "2010-000001" y asi consecutivamente, uso access 2003 vi como poder hacerlo desde mi tabla pero no veo como ya que el tipo de dato Autonumerico no me deja hacer nada o a lo mejor nose como hacerle, entonces pido su ayuda y comprension y gracias de antemano.

Caral

11-06-2010 20:45:47

Hola
Jejeje
saludos

stynpy29

11-06-2010 20:52:00

ok gracias amigo Caral por responder pero me queda una duda como es eso de contatenar es que soy algo novato jijiji, gracias

osmuar_exp

11-06-2010 21:28:35

Seria algo asi:

Código:

showmessage(FormatDateTime('yyyy',date)+'-'+inttostr(numero_consecutivo));

ecfisa

12-06-2010 07:51:35

Hola rufo.

Código:

function TForm1.ProxCod(Numero: Integer): string;

begin

  Result:= Copy(DateToStr(Date), 7, 4) + '-' +

    Copy('000000', 1, 6 - Length(IntToStr(Numero))) + IntToStr(Numero);

end;

Saludos.

Casimiro Notevi

12-06-2010 13:06:02

Por favor, rufo, si no te has enterado con las explicaciones que te han dado, sigue preguntando, pero no abras otro tema igual, repetido, para preguntar lo mismo. Gracias.
He "mezclado" ambos hilos en uno solo.

La franja horaria es GMT +2. Ahora son las 06:23:17.