Hace cuatro semanas iniciaste este mismo
tema. Recuerda esto:
Cita:
Empezado por escafandra
Investiga esto:
Canvas->Rectangle y InvalidateRect http://msdn2.microsoft.com/en-us/library/ms534893.aspx
Utiliza también el evento OnMouseMove y OnMouseClick para mover y cambiar el tamaño de tu rectángulo.
Utiliza eventos de teclado para controlar acciones de las teclas Control y Alt.
Saludos.  |
Canvas->Rectangle dibuja un rectángulo en dicho canvas, sin necesidad de utilizar componentes visuales como TShape. Puedes dibujarlo en línea contínua, puntitos... InvalidateRect te sirva para repintar el área original cada vez que muevas o modifiques tu rectángulo selector.
Para que invalidateRect funcione mejor, haz una llamada por cada lado del rectángulo, de esa forma el área de éste no se repinta entera y el efecto visual es mejor.
Evidentemente el control de ese rectángulo, lo haces con el ratón con los eventos descritos.
Crea una variable o b¡miembro de la clase que almacene el TRect "selector" para que los eventos del ratón la modifiquen según su movimiento (OnMouseMove y OnMouseClick).
Investiga la ayuda de Builder.