У форм, панелей, кнопок, и других визуальных компонентов UniGUI есть свойство ScreenMask, выглядит оно так…
Здесь также можно настроить необходимые свойства для отображения маски пользователю. Выглядеть это может так
Можно создавать самые разнообразные маски, на самых разнообразных компонентах, прямо из свойства.
Обработчик, при этом может быть такой
|
1 2 3 4 |
procedure TMainForm.UniButton1Click(Sender: TObject); begin Sleep(3000); end; |