Felix día para todos

[edwin1]

Hola!!!!!!!!!!!!!

como puedo encontrar un componente el cual es utilisado para manerjar combinaciones de colores en el fom, si mal no recuerdo le llaman DESGRADANTE...

Muchas Graicas
pasen un feliz resto del día

[marcoszorrilla]

Hola Edwin, no sé exactamente si con esto te servirá, pero prueba a añadir un ColorDialog, que lo tienes en la paleta Dialogs de Delphi y pones un botón y un coódigo parecido a este:

procedure TForm1.Button1Click(Sender: TObject);
begin
ColorDialog1.Execute;
Form1.Color:=ColorDialog1.Color;
end;

Un Saludo.

[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

[edwin1]

MUCHAS GRACIA!!!!

ESAS RUTINA ESTAN MUY INTERESANTES, MIL GRACIA POR PRESTARME UN MINUTO DE SU APRECIDO TIEMPO ESPRO TENER LA OPORTUNIDAD DE AYUDAR LOS O A OTRA PERSONA, PASEN UN FELIZ RESTO DEL DIA.