Delphi 6 -программирование



 

20.2. SCREEN

Объект screen класса TScrеen инкапсулирует свойства и методы, упрощающие работу с дисплеем ПК, в том числе с его помощью оперативно изменяется вид используемого программой указателя мыши. Как правило, программа устанавливает указатель в виде песочных часов перед началом длинной по времени работы и восстанавливает умалчиваемую форму после ее завершения. Для этого используется свойство Cursor объекта Screen:

Screen.Cursor := crHourGlass;

// Выполняем длительную работу:

….

// Восстанавливаем умалчиваемую срорму:

Screen.Cursor :== crDefault;

Свойства объекта Screen:

property ActiveControl: TWinCon-

trol;

Содержит ссылку на элемент с фокусом ввода

property ActiveFor.gif" >

Начало Вперед