¿Cómo puedo arrastrar y colocar como el IDE de Delphi con alfileres y pestañas?

Question

Me gustaría hacer que Drag and Dock funcione tan bien en mis aplicaciones como lo hace en Delphi IDE (es decir, poder arrastrar alrededor de la vista Inspector de objetos/Estructura y acoplarlas en sitios adecuados). He tenido bastante éxito con las formas de acoplamiento en un PageControl, pero me preguntaba si alguien sabe cómo hacerlo funcionar con los pequeños botones y alfileres, etc.

También me interesaría saber qué componentes utiliza Delphi IDE para lograr esto.

El motivo de mi pregunta es que quiero hacer videos mucho más avanzados sobre cómo hacer esto, los dos que he hecho anteriormente son here y here.

Answer 1

Puede usar los componentes JVCL JvDocking para arrastrar y atracar, en casi cualquier versión de Delphi. Es gratis y de código abierto. El estilo con alfileres y botones de cierre está disponible utilizando un estilo de acoplamiento llamado estilo VID (interdev visual), que viene con JvDocking.

Ya hay un montón de alternativas comerciales también, y hay algo de apoyo integrado en Delphi, que me parece insuficiente para mis necesidades. Mientras que Delphi IDE tiene su propia biblioteca de acoplamiento interno, el soporte de pestañas es muy limitado, lento y, en mi opinión subjetiva, roto.

Sin embargo, incluso en versiones delphi antiguas, Delphi 7 y superior, JvDocking, proporciona toda la funcionalidad que proporciona el acoplamiento de la VCL, y más, así que no hay problema ignorando la funcionalidad incorporada de VCL, que es compatible con TStringGrid a Grids reales.

pasos con JvDocking:

1. servidor de muelle de la gota y el objeto de estilo muelle en (forma de host) principal y conectarlos.
2. Coloque el componente de cliente de dock en el cliente (formulario a acoplar) y conéctelo al dockstyle.
3. Configure las propiedades del servidor de base.
4. Ejecutar la aplicación. Hazlo crear una forma. Ahora arrastre el formulario del cliente a un área que el servidor del muelle pueda acoplar. Míralo atracar muy bien.

Para acoplar en demostraciones de código, consulte las demostraciones de JvDocking en la carpeta Ejemplos de JVCL.

actualización

O bien, puede utilizar lo que se construye en el Delphi VCL desde XE y XE2. XE y XE2 incluyen un proyecto de demo de acoplamiento llamado dockex.dpr.

en Win7/Vista la demo se encuentra en:

C:\Users\Public\Documents\RAD Studio\9.0\Samples\Delphi\VCL\Docking

Mire aquí para la demo en Win XP:

C:\Documents and Settings\All Users\Documents\RAD Studio\9.0\Samples\Delphi\VCL\Docking

También debe revisar la documentación para TDockTabSet en el VCL, y el EDN article vinculado en los comentarios, que tiene el código fuente puede descargar here.En mi humilde opinión, el material de Jedi JvDocking es más profesional y elegante que el Docking Demo que viene con Delphi, pero el material incorporado tiene la ventaja de funcionar sin instalar nada adicional. Acabo de probar la demo de DockTabSet y las demostraciones de acoplamiento incorporadas, y son lentas, y la pintura es fea y parpadea. JvDocking parece profesional. Es tu llamada.