Delphi. Lesson_1

Transcript

1. Во всем виноват 21 век Зайцев Никита Алексеевич Зайцев Никита Алексеевич (c) Москва, 2016 1
2. ООП 2
3. Что же такое ООП? О - Объектно О - Ориентированное П - Программирование 3
6. Основные три кита Инкапсуляция Полиморфизм Наследование 6
8. Инкапсуляция Это процесс отделения друг от друга элементов объекта, определяющих его устройство и поведение; инкапсуляция служит для того, чтобы изолировать контрактные обязательства абстракции от их реализации. 8
9. А если по-русски? Инкапсуляция скрывает детали реализации объекта. 9
11. Пример инкапсуляции Delphi T M y C l a s s = c l a s s p r i v a t e F M y F i e l d : I n t e g e r ; p r o c e d u r e S e t M y F i e l d ( c o n s t V a l u e : I n t e g e r ) ; f u n c t i o n G e t M y F i e l d : I n t e g e r ; p u b l i c p r o p e r t y M y F i e l d : I n t e g e r r e a d G e t M y F i e l d w r i t e S e t M y F i e l d ; e n d ; 11
12. Полиморфизм способность скрывать множество различных реализаций под единственным общим именем или интерфейсом. 12
14. Наследование процесс приведения к одному значению одного или нескольких свойств разных объектов 14
16. Пример кода на Delphi / / Р о д и т е л ь T A n c e s t o r = c l a s s p r i v a t e p r o t e c t e d p u b l i c / / В и р т у а л ь н а я п р о ц е д у р а p r o c e d u r e V i r t u a l P r o c e d u r e ; v i r t u a l ; a b s t r a c t ; p r o c e d u r e S t a t i c P r o c e d u r e ; e n d ; / / Н а с л е д н и к T D e s c e n d a n t = c l a s s ( T A n c e s t o r ) p r i v a t e p r o t e c t e d p u b l i c / / П е р е к р ы т и е в и р т у а л ь н о й п р о ц е д у р ы p r o c e d u r e V i r t u a l P r o c e d u r e ; o v e r r i d e ; p r o c e d u r e S t a t i c P r o c e d u r e ; e n d ; 16
17. Семейство ООП Объект Класс etc... 17
18. Что такое объект? осязаемая сущность (tangible entity) — предмет или явление (процесс), имеющие четко выраженные границы, индивидуальность и поведение. Любой объект является экземпляром класса. 18
19. Что такое класс(class)? это множество объектов, связанных общностью свойств, поведения, связей и семантики. это группа данных и методов(функций) для работы с этими данными. Золотое правило: Объект зависит от класса. Т.е. нет класса = нет объекта ( но в Delphi все совершенно не так) 19
20. Что такое класс(class)? это множество объектов, связанных общностью свойств, поведения, связей и семантики. это группа данных и методов(функций) для работы с этими данными. Золотое правило: Объект зависит от класса. Т.е. нет класса = нет объекта 20
21. В чем мы будем работать? 21
27. Объекты в Delphi Объектами в Delphi являются элементы (кнопки, лэйблы) у объектов в Delphi есть свойства, которые управляются менеджером свойств (слайд 23) для каждого объекта есть собственное программируемое событие (event) 27
28. Моя первая программа Задача: Написать программу, которая будет вычислять длину строки по нажатию на клавишу расчет Порядок выполнения: 1. Создать форму 2. Добавить к форме кнопку и назвать её "расчет" 3. Добавить текстовое поле 4. Добавить Label, который будет выводить результат 5. Написать код 6. ????? 7. PROFIT 28
29. Интерфейс программы 29
30. Event код p r o c e d u r e T F o r m 1 . B u t t o n 1 C l i c k ( S e n d e r : T O b j e c t ) ; / / П е р е м е н н ы е , к о т о р ы е м ы м о ж е м и с п о л ь з о в а т ь V a r a : i n t e g e r ; b e g i n / / Т е л о п р о г р а м м ы a : = L e n g t h ( E d i t 1 . T e x t ) ; L a b e l 2 . C a p t i o n : = I n t T o S t r ( a ) ; e n d ; 30
31. Event код (без использования лишних переменных) p r o c e d u r e T F o r m 1 . B u t t o n 1 C l i c k ( S e n d e r : T O b j e c t ) ; / / П е р е м е н н ы е , к о т о р ы е м ы м о ж е м и с п о л ь з о в а т ь b e g i n / / Т е л о п р о г р а м м ы L a b e l 2 . C a p t i o n : = I n t T o S t r ( L e n g t h ( E d i t 1 . T e x t ) ) ; e n d ; 31
33. Работа со свойствами объектов Задача: Написать программа, которая будет приветствовать пользователя если он представился, а если нет, то попросить его об этом. P.S. сохранять имя не нужно 33
34. Интерфейс 34
35. Event код p r o c e d u r e T F o r m 1 . B u t t o n 1 C l i c k ( S e n d e r : T O b j e c t ) ; b e g i n L a b e l 2 . C a p t i o n : = E d i t 1 . T e x t ; L a b e l 3 . V i s i b l e : = f a l s e ; E d i t 1 . V i s i b l e : = f a l s e ; B u t t o n 1 . V i s i b l e : = f a l s e ; e n d ; 35