Delphi-Help

Pojalusta pomogite! Как с помощью colorgrid реализовать след: при нажатии на цвет,а далее на место для закраски,она закрашивает в этот цвет?

Можно так:

var
Form1: TForm1;
col:Tcolor;

implementation

procedure TForm1.ColorGrid1Click(Sender: TObject);
begin
col:= ColorGrid1.ForegroundColor;
end;

procedure TForm1.Label1Click(Sender: TObject);
begin
Label1.Color := col;
end;