Criando um efeito degradê de cores

Criando um efeito degradê de cores Esta dica mostra como criar um efeito degradê em um Canvas qualquer. Neste caso, estamos utilizando um componente TPaintBox e o evento OnPaint. Dependendo da utilização deste recurso, esta rotina pode ser adaptada para funcionar em um outro componente. procedure TForm1.PaintBox1Paint(Sender: TObject); const clStart: TColor = clRed; clEnd: TColor

Continuar lendo »