Funciones comunes a varios Forms

[[gluglu]]

Hola Amigos !

Quiero utilizar algunas funciones de las que hago uso a lo largo de todo el programa sin tener que definirlas en cada uno de los Forms que las utiliza.

Por ejemplo, tengo una función que me cambia el color de edición de un DBEdit cada vez que le doy enfoque :

Código Delphi [-]
procedure TMain.GetFocus(Sender: TObject);
begin
  ActiveControl.Color      := clWindow;
  ActiveControl.Font.Color := clMaroon;
end;

Cual es la mejor manera de hacerlo ? Gracias.