FireMonkey компонент ход во время выполнения

Question

Введение:

У меня есть пользовательский компонент VCL, полученный из класса TCustomPanel, целью которого является действовать как своего рода пользовательской формы, который имеет родителя (основная форма), но все кнопки по умолчанию таких как максимизация, минимизация, закрытие. Этот компонент был разработан задолго до FMX, и это важная часть существующего приложения. Компонент ловит сообщения, переопределяя метод Paint и т. Д.

Основная особенность этого компонента заключается в том, чтобы иметь аналогичную функциональность, как обычная форма (плавающая во время выполнения внутри родителя, перетаскивание ...), но с некоторыми настраиваемыми графиками (мелкие кнопки и т.д ...)

Задача под рукой:

Я работаю на переписывание компоненты для FireMonkey (Delphi XE2), включая это плавающее окно, а если есть какая-либо точка, чтобы сделать что.
(я не хочу смешивать VCL и FMX, потому что в какой-то момент я хотел бы иметь все приложение в FMX.)

Вопросы:

1. Есть ли существующий контроль FMX с особенностью плавающее/ перетаскивание/перемещение во время выполнения?

2. Каков подход в Firemonkey для включения, например. Перемещение TPanel во время выполнения или есть элемент управления, который предлагает эту функцию по умолчанию: по умолчанию? Я думаю, что вся идея в FMX заключается в том, чтобы переопределить существующие методы .

3. Возможно ли в том же приложении иметь формы с различными типами ? Я думаю о создании моей пользовательской формы с помощью пользовательского стиля . В этом случае у меня может быть одна основная форма (родительская) и дочерняя форма , которые имеют разные стили.

Спасибо!

Answer 1

Для 1 и 2 событий OnMouseXXXX достаточно легко использовать себя (или защищенные виртуальные методы, если вы разрабатываете настраиваемый компонент).

Для 3, поместите TStyleBook в каждую форму и загрузите в него желаемый стиль (не забудьте установить свойство StyleBook формы). Вы также можете указать свойство StyleBook экземпляру не в форме, например. на другую форму или на глобальный объект. Если вы сделаете это, остерегайтесь использовать свойство StyleBook формы, прежде чем освобождать его, или вы получите AV-файлы.