Перемещение Shape по экрану мышью - Free Pascal

Узнай цену своей работы

Формулировка задачи:

Здравствуйте! Помогите пожалуйста! Как можно сделать чтобы shape1 можно было передвигать по экрану таская её мышью?

Решение задачи: «Перемещение Shape по экрану мышью»

textual
Листинг программы
procedure TForm1.FormCreate(Sender: TObject);
begin
 Shape1.Tag:=0
end;

Объяснение кода листинга программы

  1. Объявление процедуры TForm1.FormCreate(Sender: TObject)
  2. Установка значения свойства Tag для объекта Shape1 равным 0

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

8   голосов , оценка 4.375 из 5
Похожие ответы