calcular fecha

[fide]

Hola, eso que quieres hacer yo lo he visto. Si más ano recuerdo está en la misma ayuda del delphi.

Para que lo puedas encontrar debes de insertar un TCalendar de la apestaña SAMPLES creo, seleccionarlo, luego presionar F1 y navegar por sus métodos, propiedades y eventos hasta que encuentres lo que buscas.

Suerte!!!!

[[basti]]

No sé si hay alguna función en concreto para eso, pero por si no la hay:

Código Delphi [-]
// diaSemana : 0->Lunes, 1->Martes...
// numSemana : Número de semana del año
function DiaSemanaAFecha(diaSemana, numSemana, anho: integer): TDate;
var
  Fecha1Enero : TDate;
begin
  Fecha1Enero := EncodeDate(anho, 1, 1); //uno de enero del año;
  // sumamos el número de semanas y el día
  result := Fecha1Enero + 7 * (numSemana - 1) + diaSemana;
end;

[pablomg8]

Gracias.

Funciona bien, eso si, teniendo en cuenta el lunes=1, martes=2, etc.

He encontrado en Delphi 7 una función que lo hace, por si alguien la necesita, es la siguiente:

EncodeDateWeek(año,semana del año,dia de la semana);

dia de la semana es igual, lunes=1, martes=2,...

Se encuentra en la unidad DateUtils.

Gracias por todo.