Delphi - como dibujar y rellenar un cuadrado o circulo

Hola, mi problema es el siguiente, necesito hacer un programa muy basico, el cual muestre un cuadrado, mediante un boton, ir cambiando de color, pero la verdad no se ni siquira dibujar el cuadrado, mucho menos rellenarlo de X color, si me puedes explicar como seria eso, en mucho te lo agradecere.
de antemano gracias por tu ayuda y cooperacion.

Puedes utilizar cualquier objeto que tenga la propiedad Canvas. Algunas de las clases que tienen esa propiedad son TPanel, TForm y, la que yo te recomendaría, TImage.

La clase TCanvas tiene métodos para dibujar líneas, elipses, rectángulos, rellenar figuras, "pintar" texto, etc.

Mira la ayuda de TCanvas y sus métodos:
- MoveTo
- LineTo
- Rectangle
- Ellipse
- Fill
- FloodFill
- etc.