FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
|
#1
|
|||
|
|||
TjvDockServer y TJvDockClient
Hola a todos, hace algo de tiempo que ando por esto foro leyendo mucho, contestando poco, y aportando nada. Así que aquí va mi aportación
Hoy he estado buscando como usar los componentes TjvDockServer y TJvDockClient, y lo cual es sencillo y además guardar su estado y recuperalo al iniciar la aplicación. Estos componentes nos permiten tener ventanas que se acoplan (dock en inglés) a los bordes de la ventana principal., y además como guardar el estado de la ventanas y recuperarlo al iniciar de nuevo la aplicación. Un ejemplo sencillo, es el siguiente. Crear una aplicación con dos formularios o ventanas. La segunda ventana sacarla de la lista de creación automática. En la primera ventanta, poner un control TjvDockServer, y un control TJvDockVSNetStyle1 para que las ventanas se acoplen con estilo NET, se pueden elegir otros componentes con otros estilos. En TJvDockServer, conectarlo con el TJvDockVSNetStyle1, por medio de su propiedad DockStyle. Siguiendo en la primera ventana, o principal, colocar los siguientes componentes: TJvAppIniFileStorage y TjvFormFormStorage. Por medio la propiedad AppStorage de este último, relacionarlos los dos. Ahora en el evento Oncreate del primer formulario, poner algo así:
En la segunda ventana, colocar el componente TjvDockClient. Indicar que la ventana principal hace referencia a la ventana secundaria, por medio de su clausula uses. En el evento OnClose, de la ventana principal, escrbir algo así:
Por último, colocar un botón en el ventana principal, y en su evento Onclick, poner esto:
Con estas líneas de código, verás que tienes una ventana (la secundaria) que se puede acolplar a cualquier lugar de la principal, y además cuando cierras la aplicación y vuelves a abrirla la ventana secundaria aparece dónde estaba antes de cerrarse. Saludos /BlueIcaro |
|
|
|