![]() |
![]() |
| Paypal | FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
|||||||
| Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
|
Herramientas | Buscar en Tema | Desplegado |
|
#2
|
||||
|
||||
|
yo mismo me contestoo
Vale, chicos... al final la solucion la tengo yo.
De todas formas la comento por si alguien tuviera algun problema parecido: Como el problema era que las ventanas hijas no se enteraban, lo que he hecho es poner un Timer en el formulario principal y alli mismo compruebo las coordenadas del raton y proceso: procedure TForm.Timer2Timer(Sender: TObject); var position:TPoint; begin if MDIChildCount=0 then ver_panel_de_menu(true) else begin getcursorpos(position); if (position.x<=5) then ver_panel_de_menu(true) else if (position.x> Panel_lateral.Width) then ver_panel_de_menu(false); Update; end; end; De todas formas gracias al foro. |
|
|
|