Горев А., Макашарипов С., Ахаян Р. Эффективная работа с СУБД
Подождите немного. Документ загружается.
Dim nChoice As Integer
Select Case nChoice
Case 1
Debug.Print "Выбрано значение 1"
Case 2
Debug.Print "Выбрано значение 2"
Case Else
Debug.Print "Выбрано неправильное значение"
End
End Select
2. Цикл, помимо структуры DO WHILE, можно организовать и стандартным для большинства
языков программирования способом.
Поэтому следующая команда куда популярнее предыдущей:
FOR MemVarName = nInitialValue TO nFinalValue [STEP nIncrement]
Commands
[LOOP]
[EXIT]
NEXT
Команда FOR...NEXT обеспечивает выполнение блока команд для каждого значения
переменной, начиная со значения, равного nInitialValue, до значения nFinalValue, пошаговое
увеличение или уменьшение происходит на величину, заданную nIncrement, которая по
умолчанию равна 1. Опция LOOP приводит к передаче управления на начало следующего цикла,
а EXIT - к прекращению действия
команды.
В Visual Basic синтаксис этой команды выглядит очень похоже:
For MemVarName = nInitialValue To nFinalValue [Step nIncrement]
[Commands]
[Exit For]
[Commands]
Next [MemVarName]
По сравнению с Visual FoxPro здесь нет возможности "досрочно" начать новый цикл с помощью
опции LOOP.
Циклы FOR...NEXT могут быть вложены, но в этом случае в каждом цикле должен
использоваться уникальный параметр MemVarName. В синтаксисе Visual FoxPro пример
организации вложенного цикла приведен ниже. В переменную MyString десять раз записываются
значения от 0 до 9.
MyString = " "
FOR Words = 10 TO 1 Step -1
FOR Chars = 0 To 9
MyString = MyString + STR(Chars)
NEXT
MyString = MyString + " "
NEXT
? MyString
В синтаксисе Visual Basic этот же пример будет иметь лишь незначительные отличия:
Public Sub Main()
For Words = 10 To 1 Step -1
For Chars = 0 To 9
MyString = MyString & Chars
Next
MyString = MyString & " "
Next
converted to PDF by HupBaH9I
Debug.Print MyString
End Sub
В Visual Basic есть очень похожая на рассматриваемую команду команда организации цикла:
For Each MemVarName In ArrayName
[Commands]
[Exit For]
[Commands]
Next [MemVarName]
Эта команда позволяет выполнить какие-либо действия для группы элементов массива, имя
которого указывается в параметре ArrayName. Вместо массива может использоваться коллекция
объектов, о чем мы будем более подробно говорить позднее.
1. Даже если мы научились составлять пока очень простенькие программы, мы должны
стремиться к высоким идеалам и стараться создать дружественный интерфейс. Здесь не обойтись
без средств, позволяющих в хорошей манере сообщать пользователям разную информацию,
может и не очень приятную, спрашивать у них совета о дальнейших действиях и т. д. Учитывая
важность этой проблемы для современного пользовательского приложения, авторы, заранее
сговорившись, на первое место поставили следующую функцию. В Visual FoxPro она имеет такой
синтаксис:
MESSAGEBOX(cMessageText [, nDialogBoxType [, cTitleBarText]])
Выводит на экран определяемое пользователем диалоговое окно. Параметр cMessageText
определяет текст, который появляется в этом окне. Чтобы переместить часть сообщения на
следующую строку в диалоговом окне, используйте в cMessageText символ возврата каретки
(CHR(13)). Высота и ширина диалогового окна увеличиваются по мере необходимости, чтобы
вместить содержимое заданного в cMessageText текста.
Параметр nDialogBoxType определяет кнопки и пиктограммы, которые появляются в
диалоговом окне, а также первоначально выбранную после вывода диалогового окна на экран
кнопку.
В следующей таблице приведены возможные значения для этих элементов.
Значение
nDialogBoxType
Элементы
Кнопки диалогового окна
0 Только кнопка OK
1 Кнопки OK и Cancel
2
Кнопки Abort, Retry и
Ignore
3 Кнопки Yes, No и Cancel
4 Кнопки Yes и No
5 Кнопки Retry и Cancel
Пиктограмма
16 Знак "Стоп"
32 Знак "Вопрос"
48 Знак "Восклицание"
64
Пиктограмма "Информация
(i)"
Кнопка по умолчанию
0 Первая кнопка
256 Вторая кнопка
512 Третья кнопка
Пропуск значения nDialogBoxType идентичен определению для него значения 0.
Параметр nDialogBoxType должен представлять собой сумму трех значений - по одному из
каждого раздела приведенной таблицы.
Параметр cTitleBarText определяет текст, который появляется в заголовке диалогового окна.
Если вы опускаете cTitleBarText, в названии окна появится заглавие "Microsoft Visual FoxPro".
Возвращаемое значение функции MESSAGEBOX() указывает, какая кнопка была выбрана в
converted to PDF by HupBaH9I
диалоговом окне. В диалоговых окнах с кнопкой Cancel при нажатии клавиши Esc будет
возвращаться то же самое значение (2), что и при выборе Cancel.
Следующая таблица содержит список возвращаемых функцией MESSAGEBOX() значений.
Возвращаемое
значение
Кнопка
1 OK
2 Cancel
3 Abort
4 Retry
5 Ignore
6 Yes
7 No
В Visual Basic рассматриваемая функция имеет чуть-чуть другое написание и несколько более
богатый синтаксис:
MsgBox(cMessageText [, nDialogBoxType [, cTitleBarText] [, cHelpFileName, nContext])
Условия использования этой функции и задания ее параметров идентичны описанным выше
для Visual FoxPro. В Visual Basic для некоторых параметров можно устанавливать дополнительные
значения. Так, параметр nDialogBoxType дополнительно может принимать значение 4096, что
устанавливает модальность появляющегося сообщения на системном уровне, и пользователь не
может продолжить работать не только в текущем, но и ни в каком другом из запущенных
приложений, пока не отреагирует на данное сообщение.
Параметры cHelpFileName и nContext позволяют задать имя файла контекстной помощи и
номер темы, которая будет выведена на экран при нажатии пользователем клавиши F1.
4.4. Еще несколько навязчивых советов
Когда вы напишете пусть даже небольшую программу, посмотрите, сколько имен вы
использовали. А если программа достаточно сложная? Что бы не запутаться в громадном
количестве имен, используемых в программе, программисты давно выработали негласные
соглашения, с помощью которых здесь можно навести хоть какой-то порядок. Надо отметить, что,
начиная с версии 3.0, такие рекомендации включены и в руководство по Visual FoxPro и по Visual
Basic. Их основная идея заключается в систематизации всех имен переменных или массивов по
диапазону действия и типу хранимых в них данных.
Таким образом, структура имени должна иметь следующий вид:
ДиапазонТип_данныхИмя
Для указания дипазона рекомендуется использовать следующие символы:
l - внутренняя (local) lnCounter
p - локальная (private) pnStatus
r - региональная (region) rnCounter
g - глобальная (public) gnOldRecno
t - параметр (parameter) tnRecNo
В последнем столбце приведен пример наименования. Надо отметить, что в имени переменной
диапазон ее действия программисты указывают редко. В примерах, где это не имеет
принципиального значения, мы тоже не будем делать этого.
Для указания типа данных рекомендуется использовать следующие символы:
a - массив aMonths
c - символьные данные cLastName
y - денежная единица yCurrentValue
d - дата dBirthDay
t - данные типа "дата и время" tLastModified
b - двойной точности bValue
l - логические lFlag
n - числовые nCounter
o - ссылка на объект oEmployee
converted to PDF by HupBaH9I
u - неопределенного типа uReturnValue
Как вы могли заметить из примеров, после обозначения диапазона действия и типа данных,
имя переменной для большей наглядности лучше начинать с большой буквы. Не ленитесь давать
имени максимальную смысловую нагрузку. Это избавит вас от долгих раздумий: "И что же это за
переменная такая и зачем это она тут?"
Глава 5
Объектно-ориентированное
программирование
5.1. Объектная модель и ее свойства
5.2. Объекты и их свойства
Объекты для работы с данными
Объекты для управления работой приложения
Объекты для оформления интерфейса пользователя
Объекты-контейнеры
Невизуальные объекты
Объекты OLE
5.3. Управление событиями
5.4. Использование методов
Программирование - не такое уж приятное занятие, как может показаться на первый взгляд.
Регулярно программисты сталкиваются с двумя сильно действующими на нервы событиями: они
то часами мучаются в раздумьях, как запрограммировать то или иное функциональное решение,
то их одолевает ужасная скука при многократной реализации давно отработанных решений.
Способ борьбы с этими неприятностями называется "объектно-ориентированное
программирование" (ООП).
По разным причинам ООП, как неотъемлемая часть современных систем RAD, не сразу стала
достоянием широкого круга программистов, долгое время оставаясь уделом профессионалов,
пишущих на языках, подобных С++. Среди рассматриваемых в данной книге средств разработки
наиболее развитые средства ООП имеет СУБД Visual FoxPro. Нисколько не сомневаясь, что
остальные средства разработки будут двигаться в этом направлении, при изложении основ ООП
мы будем ориентироваться именно на эту модель.
5.1. Объектная модель и ее свойства
При структурном программировании, речь о котором шла в предыдущей главе,
последовательно выполняются операторы, записываемые программистом в соответствии с
логикой решения поставленной перед ним задачи. А теперь представьте интерфейс современной
прикладной программы, что-нибудь типа Windows 95. Представили это многообразие окон,
диалогов, задач? И все это то открывается, то закрывается, то перемещается, то изменяет цвет.
Рискнем предположить, что такой интерфейс написать средствами стандартного структурного
языка программирования просто невозможно.
В этом параграфе вы узнаете:
• Основные сведения о принципах ООП.
• Термины и определения, используемые в ООП.
• Возможности объектной модели Visual FoxPro.
• Особенности использования объектов в Visual Basic.
Объектно-ориентированное программирование делает акцент не на программные структуры, а
на объекты. Почти все, что представляет для вас интерес и, возможно, даже не существует
визуально, может быть объектом. Объектом может быть окно, поле для ввода данных,
пользователь вашей программы, сама программа и т. д. Тогда любые действия мы можем
привязать к этому объекту, а также описать, что должно случиться с ним при определенных
действиях пользователя (например, при закрытии окна). Полезный, многократно используемый
converted to PDF by HupBaH9I
объект можно сохранить в качестве типового и применять его в нескольких программах для
обеспечения сходной функциональности.
Таким образом, в ООП программист создает нужные объекты, а затем описывает действия с
ними и их реакцию на действия пользователя. При таком подходе любую программу можно
написать, включая туда тот или иной набор объектов, обеспечивающих выполнение тех или иных
функций.
Более детальное знакомство с принципами ООП начнем с терминологии, т. к. некоторые
понятия здесь являются не только новыми, но и не такими простыми, как может показаться на
первый взгляд.
Абстрактным типом данных называется такой тип данных, который описан программистом, но
не поддерживается в используемом языке программирования.
В языках программирования, которые не поддерживают ООП, таких как, например,
стандартный С, абстрактный тип данных может быть создан из существующих типов данных.
Хорошим примером такого подхода является использование структур. В языках,
поддерживающих ООП, на понятии "абстрактный тип данных" основано описание классов,
осуществляемое в программе на высоком уровне. В процессе работы программы это описание
используется для создания объектов, выполняющих реальные функции. В Visual FoxPro такой тип
данных поддерживается программно за счет использования команды DEFINE CLASS и визуально
при использовании Конструктора классов (Class Designer). Объекты, созданные во время работы
программы, доступны для управления посредством специальных переменных, которые служат в
качестве указателей на эти объекты.
Абстракцией называется метод, при использовании которого можно игнорировать не
существенные в данный момент детали и функции программы для того, чтобы получить
возможность сосредоточиться на интерфейсе программы, обмене сообщениями с пользователем и
т. д.
Абстракция поддерживает идею "черного ящика", когда часть или даже вся информация о
поведении объекта может быть скрыта. Такой подход обеспечивает возможность использования в
пользовательском приложении объектов с заранее определенными свойствами,
функциональность которых не может опускаться ниже определенного уровня. В то же время
возможно придание таким объектам дополнительных свойств и функций, изменение их внешнего
вида и т. д.
Классом называется шаблон, который описывает методы и свойства используемые для
определенного типа объектов.
На основании описания класса при работе программы создаются объекты, которые и
обеспечивают выполнение заданных функций. Из описания одного класса может быть создано
сколько угодно объектов. Такие объекты будут называться экземплярами одного класса. Описать
класс программно можно с помощью команды DEFINE CLASS и визуально при использовании
Конструктора классов.
В Visual FoxPro классы делятся на визуальные и не визуальные. Визуальные классы служат
прообразами объектов, которые будут видны и, соответственно, станут основой
пользовательского интерфейса будущей программы. Не визуальные классы могут быть видны
только в момент проектирования на их основе объектов, которые окажутся невидимыми при
работе программы. Как правило, объекты, основанные на не визуальных классах, создаются и
управляются программно, с помощью соответствующих команд и функций.
Классы хранятся в файле библиотеки классов, что облегчает к ним доступ. Этот файл имеет
расширение VCX и может содержать один или несколько классов.
Объектом называется программно связанная коллекция методов (функций) и свойств,
выполняющих одну функционально связанную задачу.
converted to PDF by HupBaH9I
Например, объект - окно для вывода данных - обладает набором свойств, описывающих его
внешний вид, и набором методов для управления его поведением на экране. Программно объект
может быть создан с помощью функции CREATEOBJECT().
Свойство - это характеристика, с помощью которой описывается внешний вид и работа объекта.
Например, заголовок, тип шрифта для его написания, вид линий и цвет в обрамляющей рамке,
источник данных и т. д.
Событие - это действие, которое связано с объектом. Событие может быть инициировано
пользователем, вызвано программой или операционной системой.
События являются основным инструментом для описания требуемой реакции объекта на
действия пользователя. Все возможные события содержат по умолчанию заложенную в них
реакцию, которую программист может изменить, записав в процедуру события определенный
программный код. Эти процедуры могут быть защищены от дальнейших изменений или,
наоборот, легко доступны для модификации пользователем. Некоторые действия в программе
вызывают целую череду событий, происходящих в определенной последовательности. Например,
загрузка экранной формы вызывает события, последовательность которых не может быть
изменена.
Метод - это функция или процедура, которая будет управлять работой объекта. Момент
выполнение метода определяется исключительно программистом, т. к. метод вызывается только
при его явном указании, например OBJECT.DRAW.
Метод может быть защищен от дальнейшего изменения. Как в любую функцию, в него можно
передать параметры и получить возвращаемое значение. Однако, ни метод, ни событие не могут
иметь вложенных процедур. Стоит также учесть, что метод не может носить имя, совпадающее по
названию со свойством.
Иерархия классов - это древообразная структура классов, отображающая взаимосвязи между
используемыми в приложении классами одного типа.
Разобраться в понятии "иерархия классов" вам поможет рис. 5.1. Классы, находящиеся на
более низких ступенях иерархии, называются подклассами. Любой из классов, находящихся в
иерархии на рис. 5.1 ниже базового класса, будет подклассом. Классы, находящиеся на более
высоких ступенях, на основании которых описаны ниже стоящие в иерархии классы, называются
родительскими классами или суперклассами. Например, на рис. 5.1 базовый класс разработчика
будет родительским по отношению к классу кнопок для панели инструментов. На основании
одного родительского класса может быть создано сколько угодно подклассов следующего уровня.
Такие подклассы называются экземплярами данного класса. На рис. 5.1 такими экземплярами
будут классы для выполнения определенных действий, созданные на основе родительского
класса графических кнопок.
Рис. 5.1.
converted to PDF by HupBaH9I
Иерархия классов может включать столько уровней, сколько пожелает разработчик, однако
при разработке системы классов для приложения лучше не превышать пяти уровней иерархии.
Базовым классом называется класс, находящийся на вершине иерархии классов, используемых
в приложении.
В Visual FoxPro базовые классы имеют весьма серьезную особенность. Они встроены в саму
СУБД, и, следовательно, их описание не может быть изменено. В связи с этим полезно ввести
понятие "базовых классов разработчика". Базовые классы разработчика являются дублерами
базовых классов Visual FoxPro, стоят на следующей ступени иерархии после них, но являются
классами более высокого уровня для всех остальных классов, используемых в приложении, как
это видно на рис. 5.1 на примере классов для кнопок управления.
Всего в Visual FoxPro программист может использовать около 30 базовых классов. Их
классификация приведена на рис. 5.2, а назначение описано в табл. 5.1.
Рис. 5.2.
Таблица 5.1. Базовые классы Visual FoxPro
Имя класса Описание
CheckBox Создает поле проверки, которое
используется для переключения между
двумя состояниями.
Column Создает столбец в объекте Grid. Столбец
может содержать данные из поля в таблице
converted to PDF by HupBaH9I
или выражение, а также включать в себя
какие-либо другие элементы управления.
ComboBox Создает список, из которого можно выбрать
один элемент. Сочетает возможности
элементов управления ListBox и TextBox, так
как, помимо выбора из списка, позволяет
вводить данные.
CommandButton
Создает одиночную кнопку управления.
Кнопка обычно используется, чтобы
активизировать событие, подобное
закрытию формы, перемещению курсора в
другую запись, печати отчета и т. д.
CommandGroup Создает группу кнопок управления.
Container Создает объект, который может содержать
другие объекты. Объекты Container могут
содержать другие объекты и разрешают
доступ к объектам, содержащимся внутри
них.
Control Создает объект элемента управления,
который может содержать другие
защищенные объекты. Объекты Control
могут включать в себя другие объекты, но в
отличие от объектов Container не позволяют
осуществлять доступ к объектам,
находящимся внутри них
Custom Создает определяемый пользователем
объект на основе пользовательского класса.
Определяемые пользователем классы - это
классы со свойствами, событиями и
методами, но без визуального
представления.
EditBox Создает область редактирования.
Используйте элемент управления EditBox
для символьных полей большой длины или
полей примечаний.
Form Создает форму для работы с данными и
управления работой программы. Форма - это
объект-контейнер, который включает в себя
все необходимые элементы управления и
составляет основу пользовательского
интерфейса.
FormSet Создает объект-контейнер, который
содержит набор форм.
Grid Создает объект Grid. Grid - это объект-
контейнер, отображающий данные в строках
и столбцах и по внешнему виду похожий на
окно Browse, но имеющий расширенную
функциональность, так как вы имеете
полный контроль над каждым элементом в
Grid за счет отдельного набора свойств.
Header Создает заголовок для столбца в Grid.
Объект Header позволяет отвечать на
события, то есть может изменять свое
значение в процессе работы программы.
Image Создает элемент управления, который
показывает изображение в формате BMP.
Label Создает метку, которая отображает текст.
Line Создает элемент управления,
отображающий горизонтальную,
вертикальную или диагональную линию.
ListBox Создает поле списка. Этот элемент
отображает список пунктов, из которых вы
converted to PDF by HupBaH9I
можете выбрать один или несколько. Может
применяться при вводе данных, когда
пользователь должен ввести только заранее
определенные значения.
OLE Bound
Control
Создает связанный элемент управления OLE.
Связанный элемент управления OLE
позволяет вам добавлять включаемые
объекты OLE из других прикладных
программ типа Microsoft Word и Microsoft
Excel, поддерживающих стандарт OLE 2.0.
OLE Container
Control
Создает элемент управления OLE. OLE-
объекты содержат элементы управления
ActiveX (файлы с расширением OCX) и
включаемые OLE-объекты из других
прикладных программ типа Microsoft Word и
Microsoft Excel. В отличие от элементов
управления ActiveX, включаемые OLE-
объекты не имеют собственного набора
событий. Кроме того, элементы управления
ActiveX не привязаны к полю типа General в
таблице FoxPro, как связанные элементы
управления OLE.
OptionButton Создает одиночную кнопку выбора. Такая
кнопка может быть добавлена только к
группе кнопок выбора.
OptionGroup Создает группу кнопок выбора. Группа
кнопок выбора - это контейнер, который
содержит отдельные кнопки выбора.
Позволяет пользователю выбрать одно
действие из списка возможных вариантов,
представленных набором кнопок.
Page Создает страницу в страничном блоке.
Объект Page позволяет с легкостью
создавать многостраничные формы или
диалоги путем помещения в окно формы
набора страниц, переключаемых с помощью
вкладок.
PageFrame Создает страничный блок, в котором
содержатся страницы формы. Страничный
блок определяет глобальные
характеристики страницы формы: размер и
положение на экране, вид рамки, активную
страницу и т. д.
Shape Создает элемент управления формы,
который отображает геометрическую фигуру
(прямоугольник, круг или эллипс).
Spinner Создает счетчик для фиксированного
изменения числового значения.
TextBox Создает текстовое поле, в котором можно
редактировать содержимое переменной,
элемента массива или поля. Текстовое поле
- это один из самых широко используемых
элементов управления для ввода и
редактирования заранее не определенных
величин.
Timer Создает невидимый во время работы
программы объект, который обеспечивает
контроль по времени за выполнением всей
программы или отдельных ее фрагментов.
Управление с помощью таймера является
полезным для фоновой обработки. Типичное
использование таймера - это получение
системного времени для определения
converted to PDF by HupBaH9I
момента, когда необходимо выполнить
какую-либо программу или прервать
некоторое действие.
ToolBar Создает пользовательскую панель
инструментов. Панель инструментов
представляет собой набор объектов,
которые объединены в одном окне. Панель
инструментов может быть пристыкована к
верхней, нижней или боковым рамкам
главного окна. Если панель не
пристыкована, она ведет себя аналогично
форме.
Базовые классы делятся на контейнеры и элементы управления. Стоит пояснить несколько
подробнее отличие классов, на основе которых создаются будущие объекты - элементы
управления, от классов-контейнеров. Объекты-контейнеры могут содержать внутри себя
другие объекты, в то же время допуская манипуляции с этими внутренними объектами. Их можно
назвать составными объектами, при этом отдельные составляющие части не теряют своего
"суверенитета". Объекты - элементы управления, основанные на не контейнерных классах,
хотя тоже могут состоять из нескольких составных частей, допускают манипуляции с ними только
как с единым компонентом.
Некоторые базовые классы занимают особое положение в связи с тем, что сами являются
составной частью другого базового класса и поэтому не могут быть основой для создания
подкласса (на рис 5.2 выделены пунктирной линией).
Наследованием называется способность передачи свойств и методов, принадлежащих классу,
на основе которого создается подкласс, вновь создаваемому классу.
Вновь создаваемый подкласс автоматически наследует все свойства и методы родительского
класса, но вы всегда можете изменить какие-то из этих свойств или методов для выполнения
специализации данного подкласса. Наследование поддерживается не только при создании
подкласса, но и в дальнейшем. Таким образом, все сделанные вами изменения в родительском
классе тут же отразятся на его подклассах. Как видно на рис. 5.1, класс кнопок для вывода
данных на печать наследует свой внешний вид от класса графических кнопок, но имеет
специализированное изображение и, очевидно, специфическую реакцию на нажатие. Если мы
решим изменить размер кнопки в классе графических кнопок, изменятся размеры всех
используемых в приложении кнопок, стоящих ниже в иерархии классов.
Оператор указания диапазона позволяет вызвать метод родительского класса с более низкого
уровня, в пределах описания подкласса. Это позволяет расширить функциональность объекта
без необходимости написания лишнего программного кода. При создании подкласса он
автоматически наследует все методы родительского класса. Мы можем изменить унаследованный
метод и в то же время выполнить не только этот измененный метод для данного подкласса, но и
метод родительского класса. Оператор имеет следующий синтаксис:
cClassName::Method
Инкапсуляция - это возможность объединения связанных фрагментов данных или процессов в
отдельный модуль - контейнер.
Это похоже на понятие абстракция - скрытие внутренних данных, то есть использование
принципа создания объекта как "черного ящика". Такой объект будет работать без раскрытия
своей внутренней структуры, обеспечивающей его функциональность. Элементы управления,
основанные на не контейнерных классах, являются хорошим примером использования принципа
инкапсуляции. Использование инкапсуляции дает два очевидных преимущества программисту:
• Более простой процесс разработки программы. При создании объектов программист
может сосредоточиться на более узких, конкретных задачах без необходимости
обдумывания тех последствий, которые могут произойти в других частях программы из-за
сделанных им изменений.
• Более безопасный способ дублирования фрагментов кода или объектов. После того как
объект описан и правильность его работы в программе проверена, все программы или
converted to PDF by HupBaH9I