求一个圆沿直线连续运动到另一端的例子。
比如我已有条直线，有个圆从这条直线的一端连续运动到另一端。
用C++Builder做的例子。

[解决办法]
代码修改如下
void __fastcall TForm1::Button1Click(TObject *Sender)
{
Canvas-> FillRect(ClientRect);
Canvas-> MoveTo(100, 30);
Canvas-> LineTo(500, 30);
Timer1-> Enabled = true;
}
//---------------------------------------

void __fastcall TForm1::Timer1Timer(TObject *Sender)
{
Image1-> Left ++;
if(Image1-> Left == 450)
Image1-> Left = 50;
}
//---------------------------------------
void __fastcall TForm1::FormCreate(TObject *Sender)
{
Timer1-> Enabled = false;
Image1-> Top = 32;
Image1-> Left = 50;
this-> DoubleBuffered = true;
}
//---------------------------------------