Компьютерные технологии в судовождении. Фадюшин С.Г. - 55 стр.

UptoLike

Составители: 

55
Рассмотрим в качестве примера привязку растровых навигацион-
ных карт базы данных ЭКС «Кадет» к географической системе коор-
динат для северных широт и восточных долгот.
Цель этого примера заключается в том, чтобы показать, каким об-
разом можно подготовить растровые навигационные карты к ведению
на них прокладки с помощью графического редактора Paint.
Технология привязки состоит из следующих шагов:
1. На главную форму ЭКС «Кадет» нанести элементы, изобра-
жѐнные на рис. 10 под заголовком Привязка карты. В соот-
ветствии с рис. 10 указать их свойство Caption.
Рис. 10. Главная форма с элементами привязки карты
2. Переходим к окну кодов (см. вторую лекцию) и объявляем
переменные величины, так, как это показано на нижеприве-
дѐнном фрагменте:
'Привязка карты (объявление переменных величин)
Dim f1r As Single 'Широта верхнего левого угла рамки карты
Dim f2r As Single 'Широта нижнего правого угла рамки
    Рассмотрим в качестве примера привязку растровых навигацион-
ных карт базы данных ЭКС «Кадет» к географической системе коор-
динат для северных широт и восточных долгот.
    Цель этого примера заключается в том, чтобы показать, каким об-
разом можно подготовить растровые навигационные карты к ведению
на них прокладки с помощью графического редактора Paint.
    Технология привязки состоит из следующих шагов:
       1. На главную форму ЭКС «Кадет» нанести элементы, изобра-
          жѐнные на рис. 10 под заголовком Привязка карты. В соот-
          ветствии с рис. 10 указать их свойство Caption.




            Рис. 10. Главная форма с элементами привязки карты

      2. Переходим к окну кодов (см. вторую лекцию) и объявляем
         переменные величины, так, как это показано на нижеприве-
         дѐнном фрагменте:
      'Привязка карты (объявление переменных величин)
      Dim f1r As Single 'Широта верхнего левого угла рамки карты
      Dim f2r As Single 'Широта нижнего правого угла рамки
                                                                   55