Читайте также: |
|
Після декількох запусків програми Швидкість автомобіля виникає бажання внести зміни до програми. Наприклад, було б непогано, щоб після введення шляху і натиснення клавіші курсор переходив в поле Час. Або щоб в поля Шлях і Час користувач міг ввести тільки цифри. Щоб внести зміни до програми, потрібно запустити Delphi і відкрити відповідний проект. Зробити це можна звичайним способом, вибравши з меню File команду Open Project. Можна також скористатися командою Reopen з меню File. При виборі команди Reopen відкривається список проектів, над якими програміст працював останнім часом.
Наприклад, зробимо зміни Процедури обробки подій OnKeyPress для компонентів Edit1 і Edit2. Слід звернути увагу на те, що для додавання в програму процедури обробки події потрібно у вікні Object Inspector вибрати компонент, для якого створюється процедура, потім на вкладці Events вибрати подію і зробити подвійне клацання в полі імені процедури. Delphi сформує шаблон процедури обробки події. Після цього можна вводити інструкції, що реалізовують процедуру обробки. Дана процедура буде має такий вигляд:
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
// Key — символ, який відповідає натиснутій клавіші.
// Якщо символ недопустимий, то процедура заміняє його
// на символ с кодом 0. В результаті цього символ в полі
// редагування не появляється, і у користувача створюється
// думка, що програма не реагує на натискання деяких
// клавіш.
case Key of
'0'..'9':; // цифра
#8:; // клавіша
#13: Edit2.SetFocus; // клавіша
// решту символів — заборонені
else Key:=Chr(0); // символ не відображати
end;
end;
Після внесення змін проект слід зберегти. Для цього потрібно з меню File вибрати командуSave all.
ІСНУЮЧІ ТИПИ КОМЕНТАРІВ:
Загальні міркування по використанню коментарів можуть бути наступними:
Дата добавления: 2015-10-16; просмотров: 89 | Нарушение авторских прав
<== предыдущая страница | | | следующая страница ==> |
ПОМИЛКИ | | | ЗАВДАННЯ ДЛЯ САМОСТІЙНОЇ РОБОТИ |