Программирование в Delphi. Барков И.А - 14 стр.

               TCursor = -32768..32767;
        В Delphi предопределены стандартные типы курсоров. Их имена: crDefault, crNone, crArrow,
crCross, crIBeam, crSize, crSizeNESW, crSizeNS, crSizeNWSE, crSizeWE, crUpArrow, crHourGlass,
crDrag, crNoDrop, crHSplit, crVSplit, crMultiDrag, crSQLWait.
        Этим именам соответствуют константы со значениями от 0 до -17; под этими идентификатора-
ми все курсоры доступны в свойстве Cursors глобального объекта Screen. Можно добавить к ним соб-
ственные курсоры, загрузив их из ресурсов и присвоив положительные идентификаторы:
                {$R cursors.RES} const Curl = 1; Cur2 = 2;
               procedure TFormI. For-mCreate (Sender: TObject);
               begin
                       Screen.Cursors[Curl] := LoadCursor(hinstance, 'CUR_1');
                       Screen.Cursors[Cur2] := LoadCursor(hinstance, 'CUR_2<);
               end;
       Познакомиться с имеющимися видами курсоров можно, скомпилировав прилагаемый на диске-
те пример CURSORS.
       У каждого элемента есть два свойства, отражающие его стиль и состояние. Они могут сослу-
жить программисту хорошую службу.
       Первый из них — набор флагов, управляющих поведением компонента:
               property ControlStyle: TControlStyle;
       TControlStyle = set of (csAcceptsControls, csCaptureMouse, csDesignInteractive, csClickEvents,
csFramed, csSetCaption, csOpaque, csDoubleClicks, csFixedWidth, csFixedHeight);
       Эти флаги означают, что данный компонент имеет следующие особенности:
с sAccept sControls Может содержать другие (дочерние) элементы управления. Таким свойством об-
                     ладают не все элементы: обладающие им называются группирующими и рассмот-
                     рены в отдельном
                     разделе.
csCaptureMouse       Может получать сообщения от мыши.
csDesignInteractive Транслирует нажатия правой кнопки мыши в нажатия левой во время разработки.

csFramed              Имеет обрамление (черным прямоугольником единичной толщины).

csSetCaption          Позволяет при изменении имени менять синхронно и свойство Text (если Text не
                      был явно переустановлен).
csOpaque              Фон элемента непрозрачен. Это означает, что при пересечении нескольких компо-
                      нентов на экране располо„.:мный под ним виден не будет.

csClickEvents         Воспринимает щелчки мышью.
с sDoubleC1i cks      Воспринимает двойные щелчки мышью. Если этот флаг отсутствует, двойные
                      щелчки воспринимаются как простые.
csFixedWidth,         Имеет фиксированную ширину или высоту соответственно. Она не изменяется при
csFixedHeight         масштабировании компонента.

       Набор флагов, отражающих состояние элемента, описывается свойством:
       property ControlState: TControlState;
       TControlState = set of (csLButtonDown, csClicked, csPalette, csReadingState, csAlignmentNeeded,
csFocusing, csCreating);
       Они означают следующее:
csLButtonDown        Над элементом в данный момент нажата левая кнопка мыши.
csClicked             Если элемент может воспринимать щелчки мышью, этот флаг устанавливается,
                      пока кнопка мыши находится в нажатом состоянии.




                                                       14