![]() |
![]() |
| 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
|
|||
|
|||
|
Hola Caral
|
|
#2
|
||||
|
||||
|
Hola
Me pregunto: Viste el codigo que puse?. Te sirvio? Es lo que buscabas? Te lo saltaste?. Saludos
__________________
Siempre Novato |
|
#3
|
|||
|
|||
|
Gracias amigo Caral no me mostraba tus mensajes que pusiste tuve que refrescar la ventana y ya quedo muchas gracias a todos. Saludos
![]() |
|
#4
|
||||
|
||||
|
Y que pasas si cierras el pograma....adios fecha y todo...
como te orientaron funciona Si y solo Si, el programa no se cierra. Mencionas que quieres una fecha no una hora determinada por lo que infiero que el programa: 1.- Estará siempre abierto 2.- Aunque se cierre debe poder "recordar" la fecha (y hora) que le habías indicado. Ambos casos requieren soluciones distintas..indícanos cual necesitas.
__________________
AKA "El animalito" ||Cordobés a mucha honra|| |
|
#5
|
|||
|
|||
|
Ok amigo mira te voy a dejar el codigo hasta donde quedo ya solucionado mis dudas cabe mencionar que todavia falta hacerle algunos detalles y posteriormente lo subire al club, te dejo el codigo.
Código:
procedure TBORRAR.Timer1Timer(Sender: TObject);
var
fecha: string;
//FileOpInfo: TShFileOpStruct;
begin
ShortDateFormat := 'dd/mm/yyyy';
label1.Caption:= DateToStr(Date);
fecha:= '06/04/2010';
if Date = StrToDate(fecha) then
Begin
if messagedlg('El software de prueba ya caduco,¿desea comprar la version total? ',mtconfirmation,[mbok],0)=mrok then
application.Terminate;
|
|
#6
|
||||
|
||||
|
Hola
Esto: No es eficiente, alguien con un poco de conocimiento y malicia se salta la fecha a placer y sigue usando el programa. Es tan simple como modificar la fecha del ordenador. Creo que para esto que buscas no va a funcionar ninguno de estos códigos. Saludos
__________________
Siempre Novato |
|
#7
|
||||
|
||||
|
Hola
Lo que yo haría si fuera programador. Haria un archivo .Bat. En este colocaria la fecha al iniciar la primera vez que se usa el programa. Una vez que se guarda la fecha, iria sumándole y guardándole a esta 1 cada vez que se use el programa hasta llegar a una fecha que se desee, por ejemplo 30 dias. Haria una comprobación con otro archivo libre y si se modifica enviaría el programa completo a la papelera y la vaciaría. Pero claro, no soy programador. ![]() Saludos
__________________
Siempre Novato |
![]() |
| Herramientas | Buscar en Tema |
| Desplegado | |
|
|
Temas Similares
|
||||
| Tema | Autor | Foro | Respuestas | Último mensaje |
| if con 2 condiciones en un TQrexpr | lucasarts_18 | Impresión | 2 | 02-01-2009 23:41:37 |
| Paradox--->Condiciones | lurad | Tablas planas | 2 | 19-09-2006 20:45:40 |
| Condiciones | Carlex | SQL | 7 | 09-08-2004 21:15:33 |
| Condiciones en SQL | agova | SQL | 5 | 20-07-2004 01:28:24 |
| condiciones en interbase | squenda | Conexión con bases de datos | 5 | 29-03-2004 02:54:49 |
|