Dibujar Cuadros con Canvas

[Drake]

Buenas de nuevo al final me surgio un asuntiyo de ultima hora, en el programa que desarrollo utilizo un TImage con unos cuadrados que sirven como guias:
http://www.drake.mundoserver.org/debug4.PNG
Ahora tengo que hacer que las celdas que aparecen que son 3 cuadrados en horizontal y 4 en vertical, es decir que aparezcan de forma proporcional si el tamaño del TImage es de 40x50 los cuadrados se dibujen de forma proporcional, en otras palabras siempre deben de haber 3 cuadrados en horizontal y 4 en vertical pero al modificar el tamaño del TImage se dibujen los cuadros de forma proporcional es decir siguen habiendo el mismo numero de cuadros pero de distinto tamaño:
http://www.drake.mundoserver.org/debug5.PNG
Con todo esto mi programa estaria completamente listo, gracias con antelacion.

Los enlaces ya funcionan seoane