![]() |
![]() |
| Paypal | FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
|||||||
| Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Buscar | Temas de Hoy | Marcar Foros Como Leídos |
![]() |
|
|
Herramientas | Buscar en Tema | Desplegado |
|
|
|
#2
|
||||
|
||||
|
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;
__________________
Daniel Didriksen Guía de estilo - Uso de las etiquetas - La otra guía de estilo .... Última edición por ecfisa fecha: 12-06-2010 a las 08:54:54. |
|
#3
|
||||
|
||||
|
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 otra guía de estilo | Búsquedas avanzadas | Etiquetas para código | Colabora mediante Paypal |
![]() |
| Herramientas | Buscar en Tema |
| Desplegado | |
|
|
Temas Similares
|
||||
| Tema | Autor | Foro | Respuestas | Último mensaje |
| Como puedo hacer esto en fast report... | AFilth | Impresión | 6 | 15-02-2017 17:59:02 |
| como hacer esto | gulder | JAVA | 1 | 15-02-2007 12:30:39 |
| como puedo hacer esto con mi FireBird 1.5 | ELINK | Firebird e Interbase | 6 | 13-04-2005 21:30:46 |
| ¿Como podria hacer esto? | slat | Conexión con bases de datos | 5 | 26-06-2004 19:08:51 |
| Como puedo hacer esto ? | IVAND | Conexión con bases de datos | 1 | 22-07-2003 00:23:24 |
|