FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
Mover un panel en tiempo ejecución por el form
Estimados miembros del club Delphi: cómo puedo mover un panel por todo el formulario?. Gracias.
|
#2
|
||||
|
||||
__________________
Daniel Didriksen Guía de estilo - Uso de las etiquetas - La otra guía de estilo .... |
#3
|
|||
|
|||
Hooola!!
Hace poco encontre esta otra forma Código:
procedure mouseDownMoveWinControl(ctrl:TWinControl); begin ReleaseCapture; ctrl.Perform(WM_NCLBUTTONDOWN,HTCAPTION,0); end; Código:
procedure TForm1.MouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer); begin if ssCtrl in Shift then begin ReleaseCapture; (Sender as TControl).Perform(WM_SYSCOMMAND, $F012,0); end; end; Saludos!! |
#4
|
||||
|
||||
Puesto que TPanel deriva de TControl, puedes utilizar este truco:
Mover controles de un form en runtime Ahí también puedes ver cómo crearlos en ejecución. (1) Baja el ejemplo (2) Añade un panel al form (3) Asigna los tres eventos del mouse ya creados (MouseDown, MouseMove y MouseUp)
__________________
Germán Estévez => Web/Blog Guía de estilo, Guía alternativa Utiliza TAG's en tus mensajes. Contactar con el Clubdelphi P.D: Más tiempo dedicado a la pregunta=Mejores respuestas. Última edición por Neftali [Germán.Estévez] fecha: 10-08-2011 a las 10:20:35. |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Mover imagenes creadas en tiempo de ejecucion en lazarus | Guy Fawkes | Lazarus, FreePascal, Kylix, etc. | 1 | 14-01-2010 19:09:14 |
Mover caida de impresión en tiempo de ejecución | osmuar_exp | Impresión | 2 | 22-03-2008 12:36:32 |
Centrar un frame sobre un panel en tiempo de ejecución | Albano | OOP | 4 | 07-03-2007 23:47:16 |
cambiar tamaño y mover componentes creados en tiempo de ejecucion | gulder | API de Windows | 4 | 18-11-2006 23:21:16 |
mover componentes en tiempo de ejecución | Dantael | OOP | 3 | 06-02-2005 12:29:46 |
|