Delphi - Cambiar fecha del día

 
Vista:

Cambiar fecha del día

Publicado por cesar (77 intervenciones) el 22/12/2005 08:13:46
Hola...
quiero saber como poder cambiar la fecha de hoy por la del dia siguiente.
por ejemplo:

hoy el sistema tiene la fecha 24/12/2005, pero yo por medio de un boton cmabie la fecha del sistema por la siguiente 25/12/2005.

No cambiar la fecha de maquina sino aumentar la fecha del ssitemao viceversa.

Muchas Gracias de antemano
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Cambiar fecha del día

Publicado por Antonio (75 intervenciones) el 22/12/2005 18:30:49
Puedes hacerlo asi
edi1.text:=dateTostr(date + 1);
puedes crear un boton donde pongas la clave y te aparece la direccion
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Cambiar fecha del día

Publicado por Virum (484 intervenciones) el 23/12/2005 00:27:10
Hola:

// cambiar fehca-hora del sistema desde delphi

procedure TForm1.Button1Click(Sender: TObject);
var
fecha:TSystemTime;
begin
fecha.wyear:=2003;
fecha.wMonth:=5;
fecha.wDayofWeek:=6;
fecha.wDay:=9;
fecha.wHour:=18;
Fecha.wMinute:=33;
Fecha.wSecond:=0;
Fecha.wMilliseconds:=0;
if not SetSystemTime(Fecha) then
showmessage('Error de cambio de fecha-hora');
end;

Por supuesto que deberías antes coger los valores que desees cambiar y aumentarlos o disminuirlos.

Suerte.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Cambiar fecha del día

Publicado por cesar (77 intervenciones) el 23/12/2005 10:32:28
Gracias amigos por las repuestas son buenas
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar