FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
Duda Con Fechas.
Saludos Amigos!
Necesito realizar un cálculo en base una fecha inicial (edit1.text:= 20/06/05) que le sume 60 días y me de el resultado (Edit2.text:= ?), ésto es con el motivo de cálcular fechas de vencimiento de los claves de acceso de las usuarios a un proyecto que hago para así actualizarlas. Alguna Idea?? |
#3
|
||||
|
||||
Tienes varias formas, aquí tienes un ejemplo sencillo:
-suponemos que hay un edit donde escribimos una fecha "28/05/2006" -un botón, este es su código onclick -otro edit donde presentamos la fecha a la que le añadimos 60 días Código:
procedure TForm1.Button1Click(Sender: TObject); var DDate:TDate; begin // lo pasamos a una variable Date DDate := StrToDate(Edit1.Text); // Le sumamos 60 dias DDate := DDate + 60; // Lo presentamos en otro edit Edit2.Text := FormatDateTime('dd/mm/yyyy',DDate); end; |
#4
|
||||
|
||||
Sotrono, casi nos tropezamos
|
#5
|
|||
|
|||
hey!
Gracias por la ayuda! |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Las horribles fechas, control de fechas | Huer | OOP | 6 | 18-10-2005 19:11:49 |
Fechas | jmlifi | Varios | 2 | 11-04-2005 16:40:22 |
sql con fechas | soloriv | SQL | 4 | 11-03-2005 21:12:49 |
Fechas SQL | ronson | SQL | 2 | 11-03-2004 11:48:34 |
|