Evitar el refresco de un TImage como fondo de un form

[Deiv]

Hola,
No tengo mucha experiencia en gráficos y/o en programación pero recordé que hace tiempo atrás había leido algo al respecto del hilo y te paso las direcciones, donde quizá puedas hallar respuesta a tus preguntas, son artículos que se encuentra en GRUPO ALBOR, y la idea de Ian Marteens:

1.- Cómo conseguir una imagen como fondo de un formulario
2.- Imagen de fondo en un formulario MDI

Ojalá te sirvan de algo
Un saludo
Deiv

Edito: No encuentro esa página en ALBOR, entonces estaba en la sección Trucos, ahora no lo encuentro, de todas maneras te envío 2 archivos adjuntos que grabé hace tiempo, es lo mismo.

[Deiv]

Hola,
¿Te sirvió la información?, no?, ya que Yo también estoy pensando más adelante hacer algo parecido al tuyo, me informarías si esos ejemplos te ayudaron y ver la forma de implementar en los mios?
Un saludo

[[gluglu]]

Gracias Deiv por tu información.

He intentado implementarla, pero a primeras me encuentro con que el método Forms.MakeObjectInstance no lo tengo disponible. Para mayor información digo que estoy utilizando Delphi 2006 VCL.Net

No sé si existe algún sustituto para implementarla.

El código correspondiente a los ejemplos que mandaste es :

Código Delphi [-]
procedure TForm1.FormShow(Sender: TObject); 
...
// Obtener la dirección de nuestro procedimiento de ventana 
Proc_Cliente := Forms.MakeObjectInstance(ClienteWindowProc);
...
...
//############################################################################
// RUTINA : ClienteWindowProc(Messages::TMessage &Message) 
// 
// ACCIÓN : Sub-clasifica el procedimiento de mensajes del área cliente con 
//          el objeto de pintar en el mismo (mensaje 'WM_ERASEBKGND'). 
//############################################################################
procedure TForm1.ClienteWindowProc(var Message: Messages.TMessage);
....

[javisuco]

Estimado gluglu:

Este es uno de los principales problemas que tiene Delphi, el otro es el de las Fuentes Grandes (La interfaz se estropea seleccionando fuentes grandes).

Yo hace muchos años detecté este problema y es..... Tatán..... si te fijas en el código del control TImage cada vez que un objeto se mueve sobre su canvas, se producen dos eventos:

- Invalidate.
- Repaint (Esto es, el parpadeo).

Para ello, no tienes más remedio que crearte un nuevo control copiando el código del TImage que está accesible y cortar la actualización cuando un objeto pasa por encima de el.

Espero te sirva de algo.