|
|
 |
 |
|
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 |
|
|
|
#1
12-06-2010
|
||||
|
||||
|
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 07:54:54. 
|
|
#2
12-06-2010
|
||||
|
||||
|
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 16:59:02 |
| como hacer esto | gulder | JAVA | 1 | 15-02-2007 11:30:39 |
| como puedo hacer esto con mi FireBird 1.5 | ELINK | Firebird e Interbase | 6 | 13-04-2005 20:30:46 |
| ¿Como podria hacer esto? | slat | Conexión con bases de datos | 5 | 26-06-2004 18:08:51 |
| Como puedo hacer esto ? | IVAND | Conexión con bases de datos | 1 | 21-07-2003 23:23:24 |
 |
|
Modo Híbrido
