Como mover una ventana sin bordes
Hola, ¿cómo puedo mover una ventana que no tiene bordes? En la web de trucomania he visto el siguiente truco pero el problema que tiene es que luego no se pueden mostrar los popus.
private { Private declarations } //procedure WMNCHitTest(var Msg: TWMNCHitTest); message WM_NCHITTEST; procedure TForm1.WMNCHitTest(var Msg: TWMNCHitTest); Begin inherited; if Msg.Result = htClient then Msg.Result := htCaption; End |
Cita:
// Saludos |
Explicación
Pues tengo una ventana que no tiene bordes y la quiero mover (normalmente las ventanas solo se pueden mover desde el titulo de la ventana pero si le he eliminado los bordes no existe el titulo). El caso es que encontre un truco que hace lo que quiero pero los menus en forma de popup no los muestra si implemento dicho truco.
Gracias por tu interes. |
Ya entiendo.
Prueba modificar el truco así:
De esta forma sólo permites el movimiento si el click es con el botón izquierdo y dejas el derecho libre. // Saludos |
Muchas gracias
Muchisimas gracias, era justo lo que estaba buscando.
Saludos. :) |
y como se quitan los bordes de las ventanas/formularios??
|
Cita:
|
:( vale, es sencillo.... la proxima vez creo que probaré antes de preguntar... respuestas asi me hacen quedar como un tonto (no por ti, sino por mi, claro)
|
Cita:
Hola trate de implementar este codigo pero no funciona quizas le falta algo |
Cita:
|
La franja horaria es GMT +2. Ahora son las 00:45:10. |
Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi