Tema: Pagecontrol
Ver Mensaje Individual
  #3  
Antiguo 21-12-2003
Fita Fita is offline
Miembro
 
Registrado: jul 2003
Ubicación: Pilar - Argentina
Posts: 216
Reputación: 21
Fita Va por buen camino
Gracias por tu interes.
Efectivamente, encontre unos forms de la aplicacion que tenian mal utilizado un evento. Como al utilizar muchos tabsheets puede sucedernos que nos olvidemos acomodarlos debidamente luego del diseño uso, este codigo:

with Pagecontrol1 do
if ActivePage <> Tabsheet1 then ActivePage := Tabsheet1;

Esto me asegura que aunque olvide algo, el usuario siempre vera el Form bien presentado.
El problema era que el codigo estaba en el evento Form.OnActivate cuando deberia estar en el OnCreate o en el OnShow.
Es evidente que el evento OnClose hace disparar entre otros al evento OnActivate.

Espero que esto sirva para tus proyectos
Nuevamente Gracias.
Un abrazo
Responder Con Cita