![]() |
![]() |
![]() |
![]() |
![]() |
FTP | ![]() |
![]() |
CCD | ![]() |
![]() |
Buscar | ![]() |
![]() |
Trucos | ![]() |
![]() |
Trabajo | ![]() |
![]() |
Foros | ![]() |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#2
|
||||
|
||||
Mira si no recuerdo mal los campos DATE se tratan como valores numericos
var fechahoy,fecharenta:tdate; Boton: Fechahoy:=strtodate(txtFechahoy.text); Fecharenta:=strtodate(txtFecharenta.text); Fechatotal:=FechaHoy-Fecharenta; if (Fechatotal<7)then //Le puse 7 digamos como para una modica multa begin showmessage('Ganaste una multa'); end else begin showmessage('Entrega a tiempo'); end; Bueno, no he probado este codigo, pero si mi procesador Core 2 Duo no me falla en mi cabeza debe funcionar ![]() Avisas si queda el codigo, si no para buscar una mejor solucion. Si tienen mas sugerencias, bienvenidas para seguir aprendiendo a manejar Delphi. Karla ![]() Última edición por karlaoax fecha: 08-06-2007 a las 17:50:14. |
|
|
![]() |
||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Resta de horas | didier | Varios | 24 | 18-11-2010 23:11:54 |
Resta de fechas Y horas | Iskariote0087 | Varios | 3 | 05-12-2006 22:31:05 |
REsta Fechas | Juanito-Kun | Firebird e Interbase | 2 | 11-10-2005 20:52:23 |
Resta equivocada... | jhonny | Varios | 6 | 26-09-2005 18:43:20 |
Resta de Tablas con SQL | agova | SQL | 8 | 24-11-2003 21:20:25 |
![]() |
|