Этап. Визуальное проектирование

Решение

Создайте новый проект. Сохраните новое приложение в папке Drag&Drop_1 – файл модуля под именем Main.pas, файл проекта – DragDrop_1.dpr.

этап. Визуальное проектирование

Для реализации данной игры воспользуемся 8 компонентами типа TShape (это будут фигуры) и 8 компонентами типа TLabel (это коробочки).

Рис. 9.1

Установите значения свойств формы следующим образом:

Name	Drag_Dropfrm
Caption	Drag&Drop

Для именования компонент введем следующие обозначения: по размеру – B (big, большой) или S (small, маленький), по цвету – В (black, черный) или W (white, белый), по форме – S (square, квадрат) или C (circle, круг). У компонентов типа TShape добавим окончание shp. Таким образом, имя компонента, изображающего большой чёрный квадрат, будет BBSshp. А у белого маленького круга – SWCshp. Используя эти обозначения, измените свойства Name компонентов Shape.

Компоненты класса Tlabel назовём по такой же схеме, изменим только окончание на lbl. То есть, если коробочка предназначена для большого чёрного круга, то название будет BBClbl. Измените свойства Name компонентов Label в соответствии с введенной схемой обозначения.

У всех компонентов Label установите свойств AutoSize в значение False, Transparent – True (чтобы компоненты, помещенные на них были видны), значения свойств Caption в соответствии с рис. 9.1.

Свойство DragMode компонентов Shape установите в значение dmAutomatic.

Для проверки правильности выбора коробочки (компонента типа TLabel) для компонента типа TShape, воспользуемся свойством Hint. Значения свойства Hint задайте в соответствии с названием компонента, но без окончания (shp или lbl). Например, у компонента SWSshp оно будет равно SWS, при чём оно будет совпадать со значением свойства для компонента SWSlbl.