ayuda con evento de monthcalendar

[zazexx]

hola a todos
antes de pasar a contarles mi tragedia, quiero manifestar que consultar y agregarme a este lugar ha sido como una bendicion, por q para empezar mis compañeros y yo , no teniamos conocimientos de lo q es Delphi y aqui hemos encontrado solucion a varios de nuestros problemas, pero el q les explico a continuacion no lo encontre....

tengo un monthcalendar al dar click obtengo una fecha inicial en base a esta obtengo una fecha final, pero antes valido que la fecha inicial sea en un dia luns mi problema es que a la hora de cambiar de mes me saca el mensajito de validacion para el dia lunes,y una excepcion(exception class EconvertError whit message "4529583/08/2007' is not a valid date) lo que esta en azul ya se que es la fecha y supongo que al dar click en el siguiente mes se junta a la fecha y es por eso q saca la excepcion pero ¡¿como puedo evitar esto?que me recomiendan hacer?... se q talvez no sea algo complicado pero como ya comente pues estoy empezando a usar delphi.....
gracias de antemano, por todo

[Enan0]

mira por lo que se puede ver en el mensaje es que estas agregando un String "la fecha con la Barra "/"" y un Float! lo que esta delante de lo que marcaste con azul.

Seguramente tu error es asignar el texto en azul, ya que las fechas se estan manejando un valor del tipo Float (si es fecha y hora) o integer (si es solo Fecha).

Pode mostrar un poco del codigo en donde haces la validacion del dia y que es lo que le volves a asignar al Calendar?

[zazexx]

la fecha q extraje de month calendar la asigno a un edit asi:

procedure TFORMATO_SEM.calendarioClick(Sender: TObject);
begin
f_i.Text:=FormatDateTime('dd/mm/yyyy',calendario.Date);
end;

despues en la edit valido que la fecha que se esta eligiendo sea en un dia lunes, por que asi lo requiero, de la siguiente forma:

procedure TFORMATO_SEM.F_IChange(Sender: TObject);
var
s,d,m,a:string;
fecha,mifecha:TDate;//estas variables son para otras operaciones
f,fm,n:integer;//estas variables son p/ otrs operaciones
begin
s:=FormatDateTime('dddd',calendario.Date);
if (s<>'Lunes')THEN
showmessage('Por favor eliga una fecha con dia lunes ')
mientras este manejando fechas de el mismo mes no hay problema solo saca el mensajito, pero a la hora de cambiar de mes obvio recibe eso y aparte de que me saca el mensaje de que el dia no es lunes saca el mensaje de la excepcion supongo por que no solo se toma el valor de la fecha sino tambien el paso del mes, asi que deberia cambiarlo a otro evento o que hago?