Перемещение Image

[Allexs]

Задача такова есть программа в ней Image нужно реализовать перемещение его при помощи курсора! Спасибо за ранее

[nick42]

//---------------------------------------------------------------------------
    int mx, my ;
//---------------------------------------------------------------------------
void __fastcall TForm1::Image1MouseDown(TObject *Sender,
      TMouseButton Button, TShiftState Shift, int X, int Y)
{   mx = X; my = Y;  }
//---------------------------------------------------------------------------
void __fastcall TForm1::Image1MouseMove(TObject *Sender, TShiftState Shift,
      int X, int Y)
{
   TImage *muvi = ((TImage*)Sender);
   if(Shift.Contains(ssLeft)) {  muvi->Left += X-mx; muvi->Top += Y-my;  }
}
//---------------------------------------------------------------------------

[Allexs]

Сенкс!!! Сейчас проверю!

[C++ Error] Unit2.cpp(896): E2451 Undefined symbol 'TObject'
[C++ Error] Unit2.cpp(897): E2141 Declaration syntax error

где ошибка в синтаксисе??? не могу понять

[nick42]

Если Вы просто скопировали текст в свой проект (в файл Unit_.cpp), то так и будет; в заголовочном файле эти функции не описаны и это непорядок. Вот ::Image1MouseDown(TObject... возникает как заготовка, если в инспекторе объектов в закладке Events для картинки дважды щелкнуть мышкой на пункте OnMouseDown; вот тогда можно смело копировать то, что содержится внутри фигурных скобок. Аналогично и с пунктом ::Image1MouseMove(TObject - пункт OnMouseMove.

[Allexs]

Я так и сделал!!! там кое что другое было уже исправил спс!!! А можно это как нить через нажатие мышки на курсор! Помойму через FormCreate делается!