Cita:
Empezado por enecumene
|
En el club, creo que esta es la segunda vez (o la tercera, ¡si es que todos se me adelantan siempre!)
Cita:
|
Empezado por jaimeh
bmp: Array [0..1000] of TBitmap;
|
yo creo que declarar eso puede ser peligroso... piénsalo... sólo con que cada bitmap ocupe 100KB en memoria, ¡la variable bmp ocupará 100MB! eso es mucha memoria. Pero bueno, como mucho se ralentizaría la máquina (creo, ya he dicho).
Si utilizas DrawCell para dibujar las celdas, entonces, antes de cada dibujado, tendrías que asignar la propiedad Max de la progressbar al número de celdas, y la propiedad position a cero, y cada vez que se dibuje una celda (esto es, en el evento OnDrawCell) incrementar en uno la posición del progressbar. Pero recuerda llamar después de esto a Refresh, Repaint, ProcessMessages o algo similar, porque sino no verás el resultado en pantalla.
Para más información con progressbar mira la ayuda de Delphi.
Saludos.