Felix día para todos

[Ruben_Cu]

Hola edwin1, si obtener degradación de colores en tu form puedes utilizar componentes hechas o simplemente dibujar sobre el canvas del form, esta combinación de colores las uso en una aplicación, como verás usa el evento OnPaint.
Variando la combinación del argumento del RGB puedes obtener distintas combinaciones de color, el ejemplo trabaja con el azul.

procedure TForm1.FormPaint(Sender: TObject);
var
      Row, Ht: Word ;
begin
      Ht := (ClientHeight + 255) div 255 ;
      for Row := 255 downto 0 do
        with Canvas do begin
           Brush.Color := RGB(Row,Row,255) ;
           FillRect(Rect(0, (Row) * Ht, ClientWidth,(Row + 1) * Ht)) ;
        end ;

end;

Saludos