[OSKR]

edusus:

Un abrazo

abrazo? spero q no seas un man....
no paja...es broma.
usa un TImage, un TTimer.
en el constructor pon:

__fastcall TForm1::TForm1(TComponent* Owner) : TForm(Owner)
{ Img->Picture->LoadFromFile("BLACKSIREN0.BMP");
  Img->Width=50;
  Img->Height=50;
  Img->Stretch=true;
  Img->Top=100;
  Img->Left=10;
  Timer1->Interval=25;
  Timer1->Enabled=true;
}

en el timer pon:

void __fastcall TForm1::Timer1Timer(TObject *Sender)
{ Timer1->Enabled=false;
  double x=Img->Left+30;
  double y=20*sin(x)+100;
  Img->Left=x;
  Img->Top=y;
  if(x <= 1500)
    Timer1->Enabled=true;
}

todos los numeritos q ves ahi son arbitrarios, mi DeltaX es de 30 y mi DeltaY q los escoja el seno, el DeltaT es de 25 milisegundos.
La resoluciòn q uso es 2048x1536 y se ve bien