problema con monthcalendar

[turbopascual5.0]

Hola.

tengo un componente montcalendar en un panel.

En el evento on enter del panel en que esta situado tengo

monthcalendar3.date:=date;

para que se presente con la fecha actual ya preseleccionada.

Siempre me pone el 30/03/2011 .

Eliminando en evento on enter y poniendo la fecha actual en la propiedad date, tambien me sigue presentando la fecha 30/03/2011

gracias

[marcoszorrilla]

Lo que creo es que el evento OnEnter no se produce, haz esta sencilla prueba:

Código Delphi [-]
procedure TForm1.Panel1Click(Sender: TObject);
begin
ShowMessage('evento');
Monthcalendar1.Date:=Date-10;
end;

Con esto verás que el evento se produce y además funciona.

Ahora corta el código de este evento, para dejarlo vacío y pégalo en el evento OnEnter, entonces verás si se produce o no.

Un Saludo.

[turbopascual5.0]

Gracias, efectivamente el evento on enter no se producía.

pensaba que solamente al poner visible en true ya se produce, pero no, además he detectado que el borrado de un atabla temporal no se producía y me estaba dando problemas.

He añadido la asignación de la fecha en el código del button que cambia el panel a visible y funciona perfectamente.

Gracias.