Hola Amigos,
Mediante lo siguiente consigo un 'degradado' sobre el fondo del Form:
Código Delphi
[-]procedure TForm1Paint(Sender: TObject);
var Row, Ht: Word ;
Rect : TRect;
begin
Ht := (ClientHeight + 50) div 51 ;
for Row := 0 to 50 do
with Canvas do begin
Brush.Color := RGB(236, 233, Row+185) ;
Rect.Left := 0;
Rect.Top := Row * Ht;
Rect.Right := ClientWidth;
Rect.Bottom := (Row + 1) * Ht;
FillRect(Rect);
end;
end;
Mi pregunta es si se puede hacer lo mismo de alguna manera con cualquier otro elemento que no sea el propio form (por ejemplo un Shape).
Saludos a todos.