Перемещение Shape по экрану мышью - Free Pascal
Формулировка задачи:
Здравствуйте!
Помогите пожалуйста!
Как можно сделать чтобы shape1 можно было передвигать по экрану таская её мышью?
Решение задачи: «Перемещение Shape по экрану мышью»
textual
Листинг программы
procedure TForm1.FormCreate(Sender: TObject); begin Shape1.Tag:=0 end;
Объяснение кода листинга программы
- Объявление процедуры TForm1.FormCreate(Sender: TObject)
- Установка значения свойства Tag для объекта Shape1 равным 0
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д