- •Лабораторна робота 1
- •Проект Delphi
- •Рекомендації по створенню нового проекту в Delphi7
- •Стандартні функції роботи з даними об’єктів
- •Використання поля Memo
- •Перелік подій об’єктів
- •Процедура реагування на подію натискання кнопки
- •Хід роботи
- •Порядок виконання приклада 3
- •Індивідуальні завдання
- •Контрольні запитання
Використання поля Memo
Очистити поля edit1 та Memo1 можна використовуючи метод Clear:
edit1.Clear
Memo1. Clear
До даних поля Memo можна застосовувати процедури і функції , які використовувались для даних типу string, наприклад
T1:= copy(Memo1.Lines[i], 0, 5);
Приклад 1. Виведення даних у поле Memo з використанням функції Add, параметр якої має бути типу string. Кожна функція Add виводить дані у новий рядок Memo.
procedure TForm1.Button1Click(Sender: TObject);
begin
Memo1.Lines.Add(edit1.text);
end;
Приклад 2.Виведення значення змінної с у відповідний рядок поля Memo .
procedure TForm1.Button2Click(Sender: TObject);
var c:integer;
begin
c:=strtoint(edit1.text )+1;
Memo1.Lines.Add('Значення С = '+inttostr(c));
end;
Приклад 3.Виведення у файл TestMemo1.txt. Причому не потрібно попередньо створювати файл.
procedure TForm1.Button2Click(Sender: TObject);
var c:integer;
begin
c:=strtoint(edit1.text )+1;
Memo1.TEXT:=inttostr(c);
Label1.Caption:=inttostr(c);
Memo1.Lines.Add('Значення С = '+inttostr(c));
// Виведення у файл
Memo1.Lines.SaveToFile('TestMemo1.txt');
End;
Приклад 4. Завантаження даних з файлу TestMemo.txt.
procedure TForm1.Button3Click(Sender: TObject);
var Y,X:integer;
begin
Memo1.Lines.LoadFromFile('TestMemo.txt');
end;
Перелік подій об’єктів
Ми розглянули основні об’єкти. Крім переліку властивостей вони мають і перелік подій. На відміну від властивостей події є практично стандартними для всіх компонентів. Розглянемо основні події властиві об’єктам Delphi. Інші події розглянемо у наступних лабораторних роботах.
Action – подія, що відображає дії з об’єктом. Має складний механізм зв’язків. Action – це індексована властивість, що включає в себе перелік дій з переліку дій компонента (action list). Можна створювати власний перелік подій/команд (наприклад дія правою кнопкою мищі), присвоїти їм значення (0, 1, 2, ... до меж встановлених для переліку) і надалі звертатися до них при програмуванні подій. Створення action list – об’єкт TActionList у форму; додавання нових подій до переліку – подвійний клік мишею на об’єкті і вибір відповідних опцій у вікні Action List editor; встановіть властивість для кожного дії у інспекторі об’єктів.
ActiveControl – встановлює або переключає контроль на даний об’єкт (форму). Delphi має кілька методів контролю об’єктів. Дана подія може як переводити фокус на потрібний компонент, так і встановлювати новий метод (тільки один метод може бути активним)
OnActivate – коли форма чи об’єкт отримує активацію (Action)
OnCanResize – вказує як має контролюватися об’єкт, коли змінюються його розміри
OnClick – клік миші (не важливо якою саме кнопкою)
OnClose – подія закриття форми (використовує Close method, який в свою чергу закриває форму. Якщо закривається головна форма, то всі інші субформи обриваються. Тоді використовується Terminate method) Дією, що призводить до події OnClose може бути як дія користувача, так і програмна дія
OnCloseQuery – подія для специфікації чи може форма бути закритою чи ні. Повертае величину CanClose типу Boolean. (часто використовується при роботі з діалоговими вікнами)
OnCreate – подія створення проєкту
OnDblClick – подвійний клік миші
OnDeactivate – якщо активація переходить з даного об’єкту на інший включається подія деактивації
OnDestroy – включається під час ліквідації об’єкту (в тому числі після OnClose)
OnKeyDown – використовується для програмування подій клавіатури (натиснута клавіша або комбінація клавіш). Для програмування таких подій необхідно знати код клавіші (тип word) - Virtual key code.
VK_LBUTTON ліва кнопка миші |
VK_BACK Backspace |
VK_RBUTTON права кнопка миші |
VK_TAB Tab |
VK_MBUTTON середня кнопка миші |
VK_CLEAR Clear |
VK_CANCEL Control+Break |
VK_RETURN Enter |
VK_SHIFT Shift |
VK_CONTROL Ctrl |
VK_MENU Alt |
|
OnKeyPress – використовується для задання події простого натискання 1-ї клавіші
OnKeyUp – використовується аналогічно до OnKeyDown, з різницею фіксування віджата кнопки (для ігр)
OnMouseDown – натискання кнопки миші
OnMouseMove – рух миші
OnMouseUp – відтискання кнопки миші
OnMouseWheel – події колеса миші (мають пріоритет над наступними двома подіями)
OnMouseWheelUp – подія прокручування колеса вверх
OnMouseWheelDown – прокручування колеса вниз
FocusControl – використовується для встановлення фокусу, якщо користувач має прискорений ключ до обраного об’єкту label
OnChange – подія зміни властивості Text користувачем для об’єкту Edit (або близьких за властивостями до даного)
OnEnter – коли вже активізовано об’єкт (після OnActivate)
OnExit – коли вже де активізовано об’єкт (після OnDeactivate)