Hola corbatín.
En primer lugar, te comento que has encerrado las citas en etiquetas [ code ], cuando debiste hacerlo en etiquetas [ quote ]cita[ /quote ] que queda asi:
Por el uso de code, veras que el tamaño de la página se ha disparado horizontalmente, pues aqui no se dividen las líneas... se supone que se trata de código... e incluso en mi resolucion de 1280x1024 es necesario ir a la derecha para ver todo el mensaje... si podes editarlo, es de agradecer.
Luego... una última idea, ya que realmente me parece engorroso tener que asignar por código los captions e imagenes de los botones... supongo que ya dependerá de las necesidades de cada uno, pero para hacer algo mas de propósito general, creo que podrias definir una propiedad Captions en el componente, que sea un TStrings, y que al ser asignada escriba el caption de cada botón... igual, podes poner una propiedad glyphs, que se base en un TImageList. O bien que hagas otras dos propiedades arrays para acceder estas propiedades y no directamente a los botones...
Hasta luego.