前两天的画线不能改变颜色问题。好几天没人能解决。再拿出来碰碰运气。

procedure TForm1.Button3Click(Sender: TObject); procedure TForm1.Button3Click(Sender: TObject);