Дипломная работа: Класний електронний журнал

Його значення мають наступний сенс:

csSimple — весь список видний увесь час. Поточний вибір відображається в редакторі, його можна змінити;

csDropDown — список відкривається (випадає) і ховається при натисканні кнопки, розташованої праворуч від тексту.

csDropDownList — список випадаючий, але елемент, що редагує, замінений статичним текстом і уводити свої дані користувач не може;

csOwnerDrawFixed — визначений користувачем стиль списку з постійною висотою елемента;

csOwnerDrawVariable — визначений користувачем стиль списку з перемінною висотою елемента.

Принципи користувальницької зображення списку для csOwnerDrawFixed і csOwnerDrawVariable, а також зв'язані з цим методи і події залишилися такими ж, як у TListBox. За замовчуванням установлюється сталь csDropDown.

Організація списку також подібна з попередньої. Приведені властивості і методи мають те ж призначення:

(Pb) property Items: TStrings;

property Itemlndex: Integer;

procedure Clear;

(Pb) property Sorted: Boolean;

(Rc) property Canvas: TCanvas;

Текст, що міститься в елементі списку, що редагує, доступний через властивість:

(g5) property Text: TCaption;

Його максимальна довжина обмежена числом символів, рівним значенню властивості:

(Рb) property MaxLength: Integer;

Якщо MaxLength дорівнює 0, то обмежень на довжину рядка немає (до 255 символів).

Частина тексту може бути виділена. Три властивості містять виділений текст, його положення і довжину:

property SelText: strings-property SelStart: Integers-property SelLength: Integer;

procedure SelectAll;

Метод виділяє весь текст.

property DroppedDown: Boolean;

Значення властивості відповідає стану списку: True відповідає відкритому ("випавшому") списку. З його допомогою можна чи показувати ховати список із програми. При зміні стану списку виникає подія:

(Pb) property OnDropDown: TNotifyEvent ;

Максимальне число елементів, що показуються при випаданні списку:

(Pb) property DropDownCount: integer;

Компонент TSession

TObject—>TPersistent->TConiponent->TSession.