Canvas Does Not Allow Drawing

[<Sergio>]

Empezado por ebeltete

Mi ejecutable es de 2.16 MB, es una aplicacion que maneja bases de datos paradox, y esta hecho en Delphi 5, nunca le di pelota al tema de los recursos, de hecho el programa funciona bien, pero..., siempre es bueno optimizar los recursos, y generalmente cuando estoy trabajando en el con Delphi y trato de abrirlo me produce ese error, muchas veces tengo que cerrar Delphi y ejecutarlo para probarlo, esto se me hace fastidioso por todo lo que significa, otra pregunta, como le asigno la imagen desde un imagelist al glyph de un speedbutton, puedo hacer algo como esto: speedbutton2.glyph:=speedbutton1.glyph, esto me reduce la cantidad de bitmap?
Gracias y un abrazo.

2.16 MB hmmm pues tus bmp son relativamente chicos y no es problema de resolución de tus bmp.

Como ya indico Roman, revisalo con el memproof por que también revisa esas cuestiones de recursos gráficos. A mi me ayudo a encontrar un bug de liberación de memoria por culpa de un "destroy" que estaba en "private" y no en "protected" donde debería estar.

Aunque esto no solucionará tu problema, es bueno tener un compresor de .exe : ¿o ya usaste uno para reducir de tamaño tu .exe?

The Ultimate Packer for eXecutables
Copyright (c) 1996-2004 Markus Oberhumer & Laszlo Molnar
http://upx.sourceforge.net

[PabloTech]

Como bien dijo andrés1569:
Este error se lanza únicamente cuando un objeto TCanvas no puede crear un Handle sobre el que dibujar. En otras palabras, si tienes los recursos del sistema bajo mínimos es muy probable que Windows no permita asignar más Handles, y cuando un objeto que necesita dibujarse a través de Un TCanvas lo solicita, Windows se lo deniega, de ahí ese error.
Mi sistema ya pasa los 4MB y el error me aparecía de vez en cuando. Tengo una ventana con dos grillas enlazadas como maestro-detalle y un reporte que se cargaba, a veces un 1%, un 15% o un 25%, siempre aleatoriamente. Los datos los obtengo de PostgresSQL. Vi sus hipótesis y son acertadas. La solución que me dió excelente resultado es deshabilitar los controles asociados a los datos (o sea las grillas) antes de ver o imprimir el reporte. Ejemplo:

ModuloDatos.t_Clientes.DisableControls;
...
r_Listado.Print; // o r_Listado.PreviewModal;
...
ModuloDatos.t_Clientes.EnableControls;

Espero que les sirva como a mi.