Page 21 - 2581
P. 21
17. Встановіть кнопку «Точний збіг», по натисненню на яку
здійснюватиметься перехід на потрібний запис. Приклад
використання методу Locate :
If not table1.locate('SurName ', edit2.text,[loCaseInsensitive]) then
showmessage('Немає даних!');
У методі Locate використовуються три аргументи:
- Ім'я поля, за яким здійснюється пошук.
- Пошукове значення (ціле, рядок, речове і так далі).
- Набір опцій, який використовується для налаштування
пошуку. Опція LoCaseInsensitive переводить пошук в режим, що не
розрізняє рядкові і прописні букви. Опція LoPartialKey означає, що
BDE сприйматиме їх, якщо вони задовольняють критерій запису
(початок значень полів співпадає зі значенням пошуку).
18. Встановіть кнопку «Пошук схожого», після натиснення на
яку здійснюватиметься перехід на найбільш схожий запис. Приклад
використання методу Locate :
If not table1.locate('SurName ', edit2.text,[LoPartialKey]) then
showmessage('Немає даних!');
Наприклад, якщо edit1.text='верба', то покажчик в таблиці
переміститься на запис, де surName='Іванов'
19. Завдання: Ознайомтеся за допомогою методу Locate і
вивчіть приклад пошуку за декількома полями. Знайдіть першого
відмінника в 292 групі.
Підрахунок підсумків по стовпцю таблиці.
20. Іноді доводиться підводити підсумки за деякими полями
усієї таблиці. Наприклад, необхідно обчислити суму стипендій усіх
студентів. Для цього встановіть на форму під полем стипендія
компонент Label і кнопку «Сума».
21. У метод, що відповідає події OnClick для кнопки внесіть
наступний код :
Sum:=0;
Table1.first;
While not table1.eof do
Begin
20