Casa
Top.Mail.Ru Yandeks.Metrika
Foro: "Principal";
Archivo actual: 2002.01.08;
Descargar: [xml.tar.bz2];

abajo

Arrastrar y soltar componente Encontrar ramas similares


avr555   (2001-12-17 19:54) [0]

Mi pregunta es:
Quiero hacer un componente que pueda ser "arrastrado" en forma.
Como tal componente decidió usar VirtualTreeView
Uso tres eventos para arrastrar: OnMouseDown, OnMouseMove, OnMouseUp.

Cuando usé CheckListBox como un componente que se puede arrastrar, para que el componente no falle, llamé a la función SetCapture (self.Handle) y todo funcionó.
Y cuando se cambia a VirtualTreeView después de llamar a SetCapture (self.Handle), el componente deja de moverse. Si no llama a SetCapture (self.Handle), entonces todo funciona, solo el componente se "suelta" del puntero cuando arrastra.

¿Qué hacer?



DK   (2001-12-19 02:16) [1]

Intente insertarlo en el controlador OnMouseDown:
var Control: TControl; comenzar prueba Control: = Remitente como TControl; ReleaseCapture; Control.Perform (WM_SYSCOMMAND, $ F012, 0); finalmente fin
fin;



Páginas: 1 rama entera

Foro: "Principal";
Archivo actual: 2002.01.08;
Descargar: [xml.tar.bz2];

arriba





Memoria: 0.54 MB
Tiempo: 0.021 c
1-22193
T2
2001-12-14 03:17
2002.01.08
DLL


6-22272
Shadow
2001-10-06 18:26
2002.01.08
Pregunta con zakovyrkoy!


6-22282
Maamed
2001-10-08 10:08
2002.01.08
AYUDA AYUDA !!! antes de 01 / 11 ¿Cómo escribir un programa para trabajar en Pocket CE?


14-22348
Ivan Shikhalev
2001-11-06 22:04
2002.01.08
Acerca de Richter


1-22130
Katherine
2001-12-20 07:37
2002.01.08
ayuda, buena gente





africaans albanés Arabic armenio Azerbaiyán vasco Bielorruso Bulgarian Catalán Chino (simplificado) Chino (tradicional) Croata Checo Danés Dutch Inglés Estonia filipina Finnish French
gallego georgiano Alemán Griego criollo haitiano Hebreo hindi Húngaro islandés Indonesian irlandés Italiana Japonés Korean letón lituano macedonio Malay maltés Noruego
persa polaco Portuguese Rumano Ruso Serbio Slovak Esloveno Español swahili Sueco Thai turco ucranio Urdu vietnamita galés yídish bengalí bosnio
cebuano esperanto gujarati hausa hmong igbo javanés kannada khmer lao latín maorí marathi mongol nepali punjabi somalí Tamil telugu yoruba
zulú
Английский Francés Alemán Italiano portugués Русский Español