Реферат: Курс лекций по V B 5.0
Пример. Процедура копирования в буфер выделенного текста
Private Sub Copy_Click ()
Clipboard.SetText txtUser.SelText
Enb Sub
Операция вырезать:
Private Sub Cut_Click
Clipboard.SetText txtUser.SelText
txtUser.SelText = “ ”
Enb Sub
Операция вставки:
Private Sub Paste_Click
txtUser.Text = Clipboard.GetText( )
Enb Sub
Перенос графических изображений с помощью буфера обмена.
Чтобы правильно восстановить графическое изображение из буфера обмена, VB должен знать его тип.
Таблица типов данных буфера.
| Символьные константы | Значение | Формат |
| VbCFText | 1 | текст .txt |
| VbCFBitmap | 2 | побитовое изображение .bmp |
| VbCFMetafile | 3 | побитовое изображение .wmf |
| VbCFDib | 8 | побитовое изображение .dib |
| VbCFPalette | 9 | цветовая палитра |
Можно узнать тип данных в буфере с помощью метода GetFormat:
Clipboard GetFormat (Format %), где Format % - значение или константа из таблицы. Возвращает значение True, если данные из буфера имеют соответствующий формат.
If Clipboard.GetFormat (2) Then MsgBox “Побитовое изображение”.
Для получения изображения из буфера используется метод GetData:
Clipboard. GetData (Format %), где Format %
Пример.
If Clipboard. GetFormat (VbCFText) Then
txtUser.Text = Clipboard.GetText ( )
Else If Clipboard.GetFormat (VbCFBitmap) Then
pic My.Picture = Clipboard. GetData(VbCFBitmap)
Else If Clipboard.GetFormat (VbCFMetafile) Then
pic My.Picture = Clipboard. GetData(VbCFMetafile)
Else If Clipboard.GetFormat (VbCFDib) Then
pic My.Picture = Clipboard. GetData(VbCFDib)
Else MsgBox “Не определн графический объект”
End If
Копирование изображения из графического окна в буфер обмена в формате побитового изображения:
Private Sub PictureCopy_Click( )
Clipboard.Clear
Clipboard.SetData Pic.My.Picture,2
DDE
При использовании метода DDE одно приложение Windows (клиент) запрашивает у другого приложения (сервера) какую-либо информацию. Для VB в качестве сервера может выступать текстовая форма, а клиентами могут быть поля ввода, графические окна или надписи. Однако элементы управления на форме могут также передавать информацию с помощью своих свойств. Любое приложение может выступать одновременно и как клиент и как сервер: Excel?VB?WinWord.
Для установки связи нужно знать имя соответствующего приложения, например, WinWord, Excel, имя DDE для формы VB соответствующего имени исполняемого файла, либо имени проекта без расширения, если в среде разработки.
Кроме того, задается предмет DDE-связи, в частности, специфические имена файлов. Например для Excel это .xls и .xle.
И третье, указывается, какая информация передается - элемент данных DDE-связи. Например для Excel-сервера DDE элементом данных будет ячейка ... Для VB как сервера DDE элементом данных будут графические окна, поля ввода, надписи.
Свойства DDE.
LinkTopic формат: имя сервера \ имя приложения, например
Excel\ C:\ EXCEL\ Sheet1.xls
Можно устанавливать значение этого свойства для поля ввода, графического окна, надписи. Изменение значения свойства приводит к закрытию всех связей с данным приложением. Это позволяет приложению-клиенту переключаться на другие объекты.
LinkItem - определяет конкретные данные, которые будут передаваться от сервера к клиенту. Например, содержание ячейки первого столбца первой строки листа Excel Ric1/
Синтаксис: [имя формы, ] имя элемента управления.LinkItem = Item $
Item $ - строкове выражение, которое определяет элемент данных сервера.
LinkMode - режимя связи: LinkMode = 1 - горячая связь, LinkMode = 2 - холодная связь, LinkMode = 0 нет (связь разрывается)
Горячая связь - сервер посылает данные, содержащиеся в элементе связи DDE, когда эти данные изменяются в приложении-сервере; холодная - клиент должен требовать новой передачи данных.
События DDE
LinkOpen - генерируется всякий раз при установлении связи (например, информация пользователю)
Private Sub picMy_LinkOpen (Cancel As Integer)
M$ = “DDE связь установлена с” + PicMy.LinkTopic “поданным”+
M$ = M$ + PicMy.LinkItem
MsgBox
End Sub
LinkClose - завершение сеанса DDE;
для формы - Private Sub frmMy_LinkClose( ),
для элемента управления Private Sub txtMy_LinkClose(Index As Integer)
LinkExecute - если клиенту необходима какая-либо информация от сервера, когда клиент посылает команду серверу.
Private Sub Form_LinkExcecute(Command As String, As Integer )
LinkError - для обработки ошибок в сеансе связи
Private Sub FormMy_LinkError(LinkErr As Integer )
Методы DDE
LinkExecute - для посылки команд серверу DDE
элемент управления.LinkExecute Командная строка
LinkPoke - пересылка содержимого любого элемента управления DDE-клиента серверу.
Например, txtMy.LinkPoke (посылает содержание .Text)
LinkRequest - посылка запроса DDE-серверу.
LinkMode = 2
txtMy.LinkRequest - запрос на пересылку информации в свойство Text
LinkSend - если форма выступает в качестве DDE-сервера и необходимо послать содержание окна изображения.
picMy.LinkSend (при внесении существенных изменений в изображении).
OLE
OLE, сокращение от object linking and embedding (связывание и встраивание объектов), сначала рассматривалась как технология, дополняющая и расширяющая динамический обмен данными DDE. Впоследствии она далеко ушла от своего начального предназначения. В частности, сейчас этот термин рассматривается отдельно от других и имеет собственное предназначение.
Одним из отличий OLE от DDE является то, что переданный объект полностью сохраняет свой внешний вид и свойства, которыми он обладал в создавшем его приложении. Т.е. электронные таблицы представляются как электронные таблицы, текстовые документы выглядят так же, как они выглядели в текстовом процессоре и т.д. После того как в проект Visual Basic добавляется контейнерный элемент OLE, по сути дела создается мост, связывающий пользователя с другим приложением Windows, и этот элемент выглядит точно так же, как он выглядел в другом приложении.
При работе с OLE первым и самым важным понятием является объект. Объект представляет собой данные, которые поставляются приложением Windows, поддерживающим OLE, например, для Excel это электронная таблица (или ее часть). Для работы с объектами OLE необходимо использовать переменные типа Object (см. главу II), а для передачи информации в эти объекты используется тип данных Variant.
Для понимания смысла связывания представим себе группу, совместно работающую над этой книгой. Кроме автора, в работе принимают участие технический редактор, помощник редактора, корректор и многие другие. Наиболее эффективным способом работы над книгой для такой группы будет использование единого экземпляра документа с возможностью внесения изменений в текст книги каждым участником рабочей группы. Заметим, что необходимо использовать один экземпляр книги (например, на центральном сервере); в этом случае группе не придется беспокоиться о том, что какие-то важные исправления будут пропущены. (Выражаясь на жаргонном языке, это позволяет работать в большей степени параллельно, чем последовательно, нескольким участникам группы.) В случае со связанными объектами данные остаются в приложении, которое их создало. Представим себе процесс связывания как прикрепление связи к уже существующим данным. Технически при связывании в приложение Visual Basic вставляется значок, указывающий на связь, а изображение данных cохраняется в элементе управления OLE.
Идея встраивания находит применение в том случае, когда создается документ, объединяющий различные приложения Windows "под одной крышей". Встраивание в OLE позволяет пользовательским элементам встраивать внутрь себя данные. Когда Visual Basic обращается к управляющему элементу OLE, элемент переключается обратно в приложение, в котором он был создан, что позволяет использовать возможности "родного" приложения для внесения в элемент необходимых изменений.
Одной из основных задач, возложенных фирмой Microsoft на технологию OLE, являлось разрушение у пользователей стереотипов, при которых приложение рассматривалось в качестве важнейшей составляющей работы пользователя. Вместо этого на первое место было поставлено понятие документа. Например, предположим, что разрабатывается сложный отчет, включающий в себя табличные данные и графические объекты. При этом надо при работе с одной из частей документа использовать текстовый редактор, а с другой - систему управления электронными таблицами. При использовании технологии OLE другое приложение временно получает управление при работе со специфическими данными, встроенными в элемент управления. При встраивании объекта в клиентский управляющий элемент OLE ни одно другое приложение не может получить доступ к этим данным (напротив, в случае связывания другие приложения могут получить доступ к этим данным). Более того, приложение, которое создало встроенные данные, будет автоматически запускаться в тот момент, когда пользователь начнет работу с этими данными.
Другая часть OLE, называемая OLE Automation, позволяет управлять другим приложением. Несомненно также и то, что приложения Visual Basic могут управляться из других приложений. Например, из Visual Basic можно управлять приложением Excel, используя его встроенную версию языка Visual Basic, или можно управлять редактором Word, опять же используя встроенную в него версию Visual Basic. (В системе Office'97 присутствует унифицированная версия языка для всех его приложений, которая основывается на Visual Basic for Application Version 5.0.)
И, наконец, необходимо отметить, что в настоящий момент OLE является составной частью более общей технологии, которую очень часто называют COM/OLE (сокращение СОМ происходит от component object model). Суть идеи основывается на важности понятия объекта для современного программирования. В 90-х годах стало ясно, что все большее количество людей считает пересылку объектов по сети Internet достаточно легким делом, поэтому они вовсю выступают за политику, которую можно условно назвать "объекты везде". Использование COM/OLE представляется достаточно удобным способом пересылки объектов по сети и даже, в скором времени, между различными платформами.
Использование OLE
Когда пользователь добавляет клиентский элемент управления OLE в проект Visual Basic, фактически создается то, что фирма Microsoft называет составным документом OLE (OLE compound document). (При создании клиентского элемента управления Visual Basic выводит на экран диалоговую панель, в которой запрашивается имя приложения, объект которого предполагается вставить.) Клиентский элемент управления OLE поставляется со всеми версиями Visual Basic. Его значок обычно находится в нижней части панели инструментов и представляет собой сетку с надписью "OLE" внутри.
Точно так же, как и в случае с DDE, проект Visual Basic может выступать как в роли приложения-клиента (или контейнера), которое получает информацию, так и в роли приложения-сервера (или источника), которое посылает информацию. В большинстве случаев при работе с OLE приложение Visual Basic получает информацию, т.е. выступает в роли клиента. В любом случае элемент управления OLE, который поставляется с Visual Basic, является клиентским элементом управления и не позволяет приложению Visual Basic выступать в роли OLE-ñåðâåðà (хотя Visual Basic 5.0 позволяет это: все, что необходимо, это написать код или свой собственный элемент, который будет выступать в роли OLE-ñåðâåðà).
Создание OLE-îáúåêòîâ
Как уже было отмечено ранее, OLE-îáúåêò представляет собой данные, с которыми может работать элемент управления OLE. Это может быть графическая диаграмма, группа ячеек, вся электронная таблица или часть документа текстового процессора. Любое приложение, поддерживающее OLE, имеет библиотеку объектов, каждый из которых может быть "отдан" другому приложению. (Слово "отдан" является жаргонным и означает следующее: "вот вещь, с которой можно работать. Кроме того, можно работать с ней следующими установленными путями: ...") Перед тем как приступить к дальнейшему описанию технологии ÎLE, необходимо дать определение следующему термину: класс OLE (OLE-class). Это приложение, которое предоставляет OLE-îáúåêò. Любое приложение, поддерживающее технологию OLE, имеет уникальное имя класса OLE, например, "WordDocument" или "ExcelWorksheet". (Необходимо отметить, что в названии класса учитывается регистр символов.) Можно получить список доступных имен классов, нажав на изображение эллипса в свойстве Class в окне Properties для управляющего элемента OLE.
Существует четыре способа создания объектов OLE. Простейшим из них является:
Встроить или установить связь с объектом для контейнерного элемента OLE. Такой способ позволяет изменять объекты на форме во время выполнения приложения и просто добавлять связанные объекты.
Описание более сложных методов приведено ниже.
Создание OLE-îáúåêòà при помощи панели инструментов
Для добавления OLE-îáúåêòà к панели инструментов необходимо выполнить следующие шаги:
1. Выбрать Project\Components и перейти к закладке Insertable Objects.
2. Установить необходимый флажок типа объекта в появившейся диалоговой панели.
Например, можно добавить объект Excel Worksheet в панель инструментов, заполнив диалоговую панель Insertable Objects так, как показано на рисунке справа.
Теперь, при применении выбранного инструмента к форме соответствующий объект автоматически встраивается в приложение.
Доступ к объектам через пункт меню Project|References
Большинство современных OLE-êîìïîíåíòîâ приложений доступно через диалоговую панель, появляющуюся при вызове пункта меню Project|References. Эти библиотеки объектов очень полезны, так как они содержат описания всех объектов, методов и свойств, которые можно просмотреть при помощи Object Browser. Более того, всегда оказывается доступной справочная информация по используемым форматам команд из Object Browser. Например, если добавить подобным способом библиотеку объектов Excel в Visual Basic и затем использовать Object Browser для ее изучения, то можно одним взглядом определить необходимый синтаксис.
Страницы: 1, 2, 3, 4, 5, 6, 7, 8
