Image를 이용해서 하면 껌벅거립니다.
void __fastcall TForm1::Button1Click(TObject *Sender)
{
  for(int i=0;i<300;i++){
    Image1->Left++;
    Image1->Repaint();
  }
}
//---------------------------------------------------------------------------
저는 Canvas 에 직접그리는 방법을 좋아합니다.
void __fastcall TForm1::Button2Click(TObject *Sender)
{
  Graphics::TBitmap*g;
  Graphics::TBitmap*p;

  g=new Graphics::TBitmap();
  g->Width=PaintBox1->Width;
  g->Height=PaintBox1->Height;

  p=new Graphics::TBitmap();
  p->LoadFromFile("C:\\aaa.bmp");

  for(int i=0;i<300;i++){
    g->Canvas->FillRect(PaintBox1->ClientRect);
    g->Canvas->Draw(i,0,p);
    PaintBox1->Canvas->Draw(0,0,g);
  }
  delete g;
  delete p;

}


김정화 님이 쓰신 글 :
: 씨빌더를 시작한지 두달밖에 되지않는 왕초보입니다..
: 홈페이지를 아무리 뒤져봐도 이미지를 움직이게 하는 방법은 없드라구요.
: 버튼을 누르면 이미지가 아래위로 움직이게 하려면 어떻게 해야되죠?
: 예를들면 엘리베이터에서 3층을 누르면 3층까지 올라가고
: 1층을 누르면 다시 내려오는 것처럼요.
: 이와 비슷한 소스가 있으시면 공유 좀 부탁할께요. 제발!! ^^*