R Roadsign Unregistered / Unconfirmed GUEST, unregistred user! 2003-07-22 #1 默认是白色的,能否更改它的颜色? 当然不是用填加颜色图片的方法,假设可以用colorbox控件直接更改image控件的颜色 如何实现?
R realLearning Unregistered / Unconfirmed GUEST, unregistred user! 2003-07-22 #3 填充Timage的画布 procedure TForm1.ColorBox1Change(Sender: TObject); var RC : TRect; begin RC := Image1.Canvas.ClipRect ; Image1.Canvas.Brush.Color := colorBox1.Selected ; Image1.Canvas.FillRect(RC); end;
填充Timage的画布 procedure TForm1.ColorBox1Change(Sender: TObject); var RC : TRect; begin RC := Image1.Canvas.ClipRect ; Image1.Canvas.Brush.Color := colorBox1.Selected ; Image1.Canvas.FillRect(RC); end;