MapBasic. Руководство пользователя
Подождите немного. Документ загружается.
Глава
Глава 4: Основы языка
MapBasic
Основы языка MapBasic
Каждому, кто собирается
программировать на языке MapBasic,
рекомендуется прочитать эту главу, в
которой описаны основы синтаксиса
языка MapBasic
.
>Общие замечания о
синтаксисе языка
MapBasic
>Выражения
>Циклы и другие
управляющие
операторы
>Процедуры
>Процедуры>обработчики
системных событий
>Рекомендации по
использованию
процедур>
обработчиков
системных событий
>Функции, созданные
пользователем
>Директивы компилятора
>Организация программ
4
Глава 4: Основы языка MapBasic
40 MapBasic Руководство пользователя
Общие замечания о синтаксисе языка MapBasic
Прежде чем рассматривать отдельные операторы языка MapBasic,
дадим общее описание синтаксиса программ на MapBasic.
Комментарии
В MapBasic, как и в некоторых других BASICподобных языках,
апостроф ( ' ) обозначает начало комментария. Если в программе
встретился апостроф, MapBasic понимает оставшуюся часть строки как
комментарий, кроме тех случаев, когда апостроф является частью
строки символов (символьной константы).
Большие и малые буквы
Компилятор языка MapBasic не различает большие (прописные) и
малые (строчные) буквы. Вы можете использовать в своих программах
БОЛЬШИЕБУКВЫ, маленькиебуквы или БольшиеиМаленькие
Вместе.
В данном руководстве мы будем придерживаться следующего стиля:
первые буквы ключевых слов языка MapBasic будут везде большими
(прописными); переменные будут состоять только из маленьких
(строчных) букв. Например, в следующем примере программы слова If
и Then начинаются с большой буквы, поскольку они являются
ключевыми словами языка MapBasic, а слово counter содержит
только малые буквы, так как это – имя переменной.
If counter > 5 Then
Note "Счетчик переполнился"
End If
Размещение оператора на нескольких строках
Операторы в программах на MapBasic могут располагаться на
нескольких строках. Например, в следующем примере оператор
If...Then занимает несколько строк:
If counter = 55
Or counter = 34 Then
Note "Неправильное значение счетчика"
End If
Константы>коды, определенные в файле MAPBASIC.DEF
Многие операторы и функции MapBasic не будут работать правильно,
если в начале своей программы Вы не поставите строку:
Include "mapbasic.def"
Глава 4: Основы языка MapBasic
MapBasic Руководство пользователя
41
MAPBASIC.DEF – это текстовый файл, который содержит
определения многих стандартных констант MapBasic. Как правило,
названия констант, определенных в MAPBASIC.DEF, состоят из
больших букв (например, TRUE, FALSE, BLACK, WHITE,
CMD_INFO_X, OBJ_INFO_TYPE и т.д.). При чтении примеров
программ в документации по MapBasic Вы встретите много таких
константкодов. Например:
If CommandInfo( CMD_INFO_DLG_OK ) Then
Если программа использует стандартные константы (такие, как
CMD_INFO_DLG_OK в приведенном примере), то в нее следует
включить файл MAPBASIC.DEF с помощью оператора Include. Если
Вы этого не сделаете, при выполнении программы будет
зафиксирована ошибка (например, “Переменная или поле Field
CMD_INFO_DLG_OK не определена").
Как вводить операторы в окно MapBasic
Программа MapInfo содержит так называемое Окно MapBasic. Вы
можете использовать окно MapBasic для изучения синтаксиса
операторов языка MapBasic. Однако, для окна MapBasic действуют
некоторые ограничения:
• В окно MapBasic нельзя вводить некоторые операторы MapBasic,
которые Вы тем не менее можете использовать в программах на
MapBasic. Общее правило таково: управляющие операторы
(такие как If...Then, For...Next и GoTo) не работают в окне
MapBasic.
• Чтобы узнать, можно ли использовать тот или иной оператор в
окне MapBasic, обратитесь к Справочнику MapBasic. Для
каждого оператора, который нельзя использовать в окне
MapBasic, в Справочнике сделано соответствующее замечание.
• Когда Вы вводите оператор непосредственно в Окно MapBasic
программы MapInfo, следует соблюдать особые соглашения
переноса оператора на следующую строку. Вместо ENTER в
таких случаях следует нажимать CTRL+ENTER. После того,
как Вы наберете оператор полностью, выберите его и нажмите
ENTER.
• Стандартные константы, определенные в MAPBASIC.DEF
(напр., BLACK, WHITE и т.д.) нельзя использовать в окне
MapBasic. Однако каждой такой константе соответствует свое
число (код), которое можно найти в файле MAPBASIC.DEF;
например, константе BLACK соответствует число 0. В окне
MapBasic Вы можете использовать числовые значения,
соответствующие стандартным константам, вместо имен этих
констант (т.е., например, ноль вместо “BLACK").
Глава 4: Основы языка MapBasic
42 MapBasic Руководство пользователя
• Каждый оператор, который Вы вводите в окно MapBasic
ограничен размером в 256 символов.
Переменные
Синтаксис объявления переменных и операторов присваивания в
языке MapBasic очень похож на синтаксис этих операторов в других
современных BASICподобных языках. Однако в MapBasic имеется
несколько типов переменных, которые отсутствуют в других языках
программирования (например, тип Object; полный список типов
переменных в языке MapBasic можно найти в главе Справочника Map
Basic, посвященной оператору
Dim).
Что такое переменная?
Переменную можно определить как небольшой участок памяти
компьютера, отведенный и предназначенный для временного хранения
некоторого типа информации. Чтобы отвести подобный участок
памяти, надо объявить переменную. Каждая переменная должна иметь
уникальное имя (например, counter, x, y2, customer_name). Для
каждой объявленной переменной MapBasic отводит определенный
участок в памяти. После этого переменную можно использовать для
хранения информации.
Объявление переменных и присвоение им значений
Для объявления переменных используется оператор Dim. Каждую
переменную следует объявить, причем объявление переменной должно
предшествовать ее использованию.
Оператор равенства (=) используется, чтобы присвоить переменной
значение.
В следующем примере объявляется переменная типа Integer, и ей
присваивается значение 23:
Dim counter As Integer
counter = 23
Одним оператором Dim можно объявить несколько переменных,
разделяя их запятыми. Следующий оператор Dim объявляет три
вещественные переменные с плавающей точкой:
Dim total_distance, longitude, latitude As Float
longitude = 73.55
latitude = 42.917
Также в одном операторе Dim можно указывать переменные разных
типов. Вот как объявить две переменные типа Date и две переменные
типа String:
Dim start_date, end_date As Date,
first_name, last_name As String
Глава 4: Основы языка MapBasic
MapBasic Руководство пользователя
43
Имена переменных
В именах переменных следует соблюдать следующие правила:
• Имя переменной не должно содержать более 31 символа.
• В имени переменной не может быть пробелов.
• Имя переменной должно начинаться с буквы, подчеркивания (_)
или тильды (~).
• Имя переменной может содержать буквы, цифры, знак
фунта(#) и подчеркивание (_).
• Имя переменной может оканчиваться одним из следующих
знаков: $, %, &, ! или @. В некоторых BASICподобных языках
эти символы определяют тип переменной; в MapBasic же они не
имеют такого смысла.
• Нельзя использовать ключевые слова языка MapBasic в качестве
имен переменных. Так, Вы не можете объявить переменные с
именами If, Then, Select, Open, Close или Count. Список
ключевых слов приводится в описании оператора Dim в
Справочнике MapBasic.
Типы данных
MapBasic поддерживает следующие типы данных:
Тип Описание
SmallInt Целое число от 32767 до 32767; занимает два байта
Integer Целое число от 2 миллиардов и 2 миллиардов; занимает четыре
байта
Float Вещественное число с плавающей точкой; хранится в восьми
байтах в формате IEEE
String Строка произвольной длины (до 32767 символов).
String * n
Строка фиксированной длины n (до 32767
символов).
Logical TRUE или FALSE.
Date
Дата
Object Графический объект; подробнее этот тип описан в главе 9
Alias Ссылка на колонку таблицы; подробнее этот тип описан в главе
7
Pen Объект типа линия; см. главу 9.
Brush Объект типа штриховка; см. главу 9.
Глава 4: Основы языка MapBasic
44 MapBasic Руководство пользователя
Строковые переменные
В языке MapBasic имеются два типа строковых переменных:
фиксированной и произвольной длины. Строка произвольной длины
может содержать до 32767 символов. Строка же фиксированной длины
имеет предел числа символов, указанный в операторе Dim.
Чтобы объявить переменную типа String произвольной длины, надо
просто применить ключевое слово String. Чтобы объявить переменную
типа String фиксированной длины, после ключевого слова String надо
поставить звездочку (*) и максимальный размер строки в байтах. В
следующем примере объявляется строковая переменная full_name
произвольной длины и строковая переменная employee_id длиной 9
байт:
Dim full_name As String,
employee_id As String * 9
Замечание: Как и в других BASICподобных языках, в MapBasic
строки фиксированной длины дополняются справа пробелами таким
образом, чтобы строка занимала все отведенное место. Так, например,
если Вы объявили строковую переменную длиной в пять байт и
присвоили ей строку “ABC", то в действительности переменная будет
содержать строку “ABC " (т.е. “ABC" и два пробела в конце). Такой
метод работы с фиксированными строками применяется для удобства
форматного вывода.
Массивы
Чтобы объявить массив, следует после имени переменной в круглых
скобках указать размер (количество элементов) массива. Размер
массива должен быть целой положительной константой или
выражением из констант. Следующий оператор Dim объявляет массив
из десяти переменных типа Date:
Dim start_date(3+7) As Date
Доступ к элементу массива осуществляется следующим образом:
имя_массива(номерэлемента)
Так, следующий оператор присваивает значение первому элементу
массива start_date:
start_date(1) = "6/11/93"
Чтобы изменить размер массива, надо использовать оператор ReDim. В
тех случаях, когда неизвестно, какого размера массив потребуется в
Вашей программе – например, изза того, что Вы не знаете, сколько
данных введет пользователь – увеличивайте при необходимости размер
массива с помощью ReDim. Текущий размер массива возвращает
функция UBound( ).
Глава 4: Основы языка MapBasic
MapBasic Руководство пользователя
45
Ниже приводится пример, в котором объявляется массив строковых
переменных name_list, а затем размер массива увеличивается на десять
элементов.
Dim counter As Integer, name_list(5) As String
...
counter = UBound(names) ' Определим размер
массива
ReDim names(counter + 10) ' Увеличим размер на 10
На массивы в языке MapBasic накладываются следующие
ограничения:
• MapBasic поддерживает только одномерные массивы.
• В MapBasic первый элемент массива всегда имеет индекс 1;
другими словами, в приведенном только что примере первым
элементом массива имен является names(1).
• Максимальный размер массива в приложениях на MapBasic,
запускаемых под MapInfo для Windows, составляет 7000
элементов. При запуске приложений на MapBasic на других
платформах (например, в MapInfo для Windows 95, Windows NT
или Macintosh) максимальный размер массива составляет 32767
элементов.
Чтобы хранить больше данных, чем может вместить массив, Вы
можете использовать для их размещения таблицы. Подробнее об
использовании таблиц речь пойдет в главе 7 "Работа с таблицами".
MapBasic инициализирует объявленные числовые массивы и
переменные, заполняя их нулевыми значениями. Строковые массивы
и переменные заполняются пустыми строками.
Типы данных, заданные пользователем (структуры данных)
Вы можете объявить свой тип данных с помощью оператора оператора
Type...End оператора Type. Пользовательский тип данных
представляет собой группу из одного или нескольких стандартных
типов. Объявив свой тип данных, Вы можете объявлять переменные
этого типа с помощью оператора Dim.
Приведем пример программы, в которой задается пользовательский
тип данных, employee (сотрудники), и затем объявляются переменные
типа employee.
Type employee
name As String
title As String
id As Integer
End Type
Глава 4: Основы языка MapBasic
46 MapBasic Руководство пользователя
Dim manager, staff(10) As employee
Каждая компонента пользовательского типа данных называется
полем. То есть тип employee в приведенном примере состоит из трех
полей: name, title и id. Синтаксис обращения к полю таков:
имя_переменной.имя_поля
В следующем примере присваиваются значения всем полям
переменной manager:
manager.name = "Гриша"
manager.title = "Самый главный менеджер"
manager.id = 111223333
Вы можете объявить массив пользовательского (нового) типа. Ниже
приведены операторы, присваивающие значения некоторым полям
первого элемента массива employee:
staff(1).name = "Дима"
staff(1).title = "Программист"
Операторы Type...End Type должны находиться вне тела процедуры. О
процедурах речь пойдет далее в этой главе. Как правило, операторы
Type...End Type размещают в начале программы.
В операторе Type можно использовать поля любого типа, в том числе и
ранее определенных пользовательских типов данных. Можно
объявлять глобальные переменные и массивы пользовательских типов.
Глобальные переменные
Переменные, объявленные оператором Dim, являются локальными.
Локальные переменные можно использовать только внутри той
процедуры, где они были объявлены. Наряду с этим MapBasic
позволяет Вам объявлять глобальные переменные, которые можно
использовать в любой процедуре, повсюду в Вашей программе.
Объявить глобальную переменную можно оператором Global.
Синтаксис оператора Global похож на синтаксис оператора Dim, только
вместо ключевого слова Dim употребляется ключевое слово Global.
Следующий оператор Global объявляет две глобальные переменные
типа Integer:
Global first_row, last_row As Integer
Операторы Global должны находиться вне тела процедуры. О
процедурах речь пойдет далее в этой главе. Как правило, операторы
Global размещают в начале программы.
Приведем пример программы, в которой объявляются несколько
глобальных переменных, а затем эти переменные используются в
процедурах.
Declare Sub Main
Глава 4: Основы языка MapBasic
MapBasic Руководство пользователя
47
Declare Sub initialize_globals
Global gx, gy As Float ' Объявление глобальных
переменных ' типа Float
Global start_date As Date ' Объявление глобальных
переменноых ' типа Date
Sub Main
Dim x, y, z As Float' Объявление локальных
переменных в ' процедуре Main
Call initialize_globals
...
End Sub
Sub initialize_globals
gx = 1 ' Присваивание значения
глобальной ' переменной GX
gy = 1 ' Присваивание значения
глобальной ' переменной GY
start_date = CurDate()' Присваивание значения
глобальной ' переменной START_DATE
End Sub
По возможности следует использовать локальные, а не глобальные
переменные, так как память под глобальные переменные отводится на
все время выполнения Вашей программы. Под локальные же
переменные MapBasic отводит память только на время выполнения
процедуры, в которой они объявлены.
Глобальные переменные можно использовать для обмена информацией
с другими приложениями. Приложения для Microsoft Windows
используют механизм так называемого динамического обмена
данными (Dynamic Data Exchange – DDE) для чтения и модификации
глобальных переменных MapBasicпрограмм; подробнее см. в главе 11.
Область определения
В процедуре можно объявить локальную переменную с тем же именем,
что и некоторая глобальная переменная. Даже если имеется,
например, глобальная переменная counter, в процедуре можно
объявить локальную переменную counter:
Declare Sub Main
Declare Sub setup
Global counter As Integer
...
Sub setup
Глава 4: Основы языка MapBasic
48 MapBasic Руководство пользователя
Dim counter As Integer
counter = 0
...
End Sub
В случае совпадения имен локальной и глобальной переменных
процедура теряет доступ к глобальной переменной. То есть в теле
процедуры будет видима только локальная переменная. В приведенном
выше примере оператор counter = 0 не окажет влияния на значение
глобальной переменной counter.
Обрабатывая имя переменной, MapBasic пытается интерпретировать
его как имя локальной переменной. Если нет локальной переменной с
таким именем, MapBasic попробует найти глобальную переменную с
таким именем. Если нет глобальной переменной с таким именем, Map
Basic попробует найти открытую таблицу с таким именем. И, наконец,
если во время выполнения программы не найдено открытой таблицы с
таким именем, MapBasic выдаст сообщение об ошибке.
Выражения
В этом разделе мы поговорим о том, что такое выражение. Под
выражением мы понимаем группу из одной или нескольких
переменных, констант, вызовов функций, имен таблиц или
операторов.
Что такое константа?
Выражение может иметь самый простой вид. Например:
counter = 23
Здесь переменной counter присваивается значение целочисленного
выражения, а именно, константа 23. Выражение 23 будем называть
числовой константой. Можно сказать, что константа – это конкретное
значение, которое можно присвоить переменной.
Следующий фрагмент программы содержит объявление строковой
переменной и присваивание ей строковой константы (имя “Семен
Семеныч"):
Dim name As String
name = "Семен Семеныч"
Синтаксис числовых выражений отличается от синтаксиса строковых
выражений: строковые константы следует заключать в двойные
кавычки (как в случае с "Семен Семеныч"), а числовые – нет
(например, 23). Значение строковой константы, например, "Семен
Семеныч," нельзя присвоить числовой переменной. Подробнее о
выражениях из констант см. ниже раздел "Константы в языке MapBa
sic".