Interpolacion RGB

[JF Sebastian]

Gracias,
He encontrado este post http://www.clubdelphi.com/foros/showthread.php?t=29167
pero me gustaria implementar manualmente la funcion de la dll.
Basicamente quiero calcular el color intermedio que esta entre el rojo y el azul-violeta de modo que si asigno el numero 1 al rojo y el 0 al azul-violeta la funcion me devuelva la tonalidad correspondiente a un numero intermedio entre 0..1. El gradiente de colores ha de estar de acuerdo con el espectro estandar de colores. No necesito que me pinte el gradiente pues necesito como maximo 20 colores fijos intermedios.
No parece dificil, pero se me resite el problema...