Hola,
estoy desarrollando un componente gráfico CLX (una especie de
Shape) con capacidad de movimiento en tiempo de ejecución. He implementado la solución propuesta en este mismo foro (
http://www.clubdelphi.com/foros/show...=&threadid=435) para resolver la cuestión del movimiento. El problema surge por el molesto parpadeo (
flickering) que tiene el control cuando se desplaza.
Siguiendo las instrucciones de la documentación, intento implementar el uso de un
bitmap off-screen en el método Paint del control para, posteriormente, volcar el contenido del Bitmap sobre el Canvas del control y reducir así el parpadeo, ya que las operaciones de dibujo sobre el Canvas del Bitmap se producen en memoria y no sobre la pantalla.
Hasta aquí todo correcto, pero en la práctica no solo no consigo que se reduzca el parpadeo, sino que además se produce un efecto lateral: el control se dibuja con una brocha (Brush) completamente diferente a la que tiene realmente; parece como si el patrón de la brocha (color y style) fuesen aletorios.
No tengo mucha práctica con el uso de gráficos en Delphi, y especialmente con Qt (recuerdo que es un control CLX, no VCL), así que en esta dirección dejo los códigos fuentes del control (es una versión reducida, centrada sólo en el problema del parpadeo) y de un pequeño programa que ilustra el problema:
http://www.clubdelphi.com/users/kino.../QCLXShape.zip
Saludos y muchas gracias.