Asignar fecha según el día elegido!!

[Vales08]

Buenas tardes foro!!

Tengo un checkbox por cada día.

√Lunes √Martes √ Miércoles √Jueves √Viernes √ Sábado √Domingo

Lo que yo quiero es lo siguiente: según el día que elijo, quiero asignarle la fecha que coincida con tal día..
Ejemplo:
Si selecciono el día MARTES, necesito según la fecha actual, asignarle la fecha inmediatamente posterior a la actual, pero que coincida con un MARTES. Si hoy es 17/10/2011 (lunes), yo necesito que a MARTES se le asigne la fecha 18/10/2011, que es el MARTES que sigue.
Y así con los días que hayan sido elegidos.

Pero quiero saber si existe alguna función para que lo haga automáticamente en un botón, ya que yo no tengo que seleccionar la fecha de ningún componente, no utilizo con componentes TDateTimePicker ni TMonthCalendar, solamente al dar aceptar, que asigne las fechas.

Se que existe una función de la unit DateUtils que a partir de una fecha se puede saber que dia de la semana es, pero yo necesito una función que haga totalmente lo contrario..
Trabajo con delphi 7 y ya tengo instalada la unit DateUtils, ya que en delphi 7 no viene instalada por defecto.

Espero me puedan ayudar y haber sido clara, cualquier duda vuelvo a explicar.
Desde ya muchas gracias..