Студопедия
Случайная страница | ТОМ-1 | ТОМ-2 | ТОМ-3
АвтомобилиАстрономияБиологияГеографияДом и садДругие языкиДругоеИнформатика
ИсторияКультураЛитератураЛогикаМатематикаМедицинаМеталлургияМеханика
ОбразованиеОхрана трудаПедагогикаПолитикаПравоПсихологияРелигияРиторика
СоциологияСпортСтроительствоТехнологияТуризмФизикаФилософияФинансы
ХимияЧерчениеЭкологияЭкономикаЭлектроника

Створення і використання документів асtіvех

Читайте также:
  1. III ОЦІНКА ЕКОНОМІЧНОЇ ДОЦІЛЬНІСТЬ ВИКОРИСТАННЯ ФАЙЛОВИХ МЕНЕДЖЕРІВ
  2. V. Технологією приготування та використанням специфічних
  3. Алгоритм використання в українських ЗМІ.
  4. АНАЛІЗ ВИКОРИСТАННЯ КОШТІВ НА ОПЛАТУ ПРАЦІ
  5. Аналіз ефективності використання виробничих запасів на підприємстві.
  6. Аналіз забезпечення та ефективності використання матеріальних ресурсів
  7. Аналіз забезпечення та ефективності використання персоналу підприємства

Документи Active дозволяють повною мірою застосувати вага можливості Visual Basic в Інтернету, або в інтрамережі. Документ Active являє собою додаток Visual Basic, для якого в ролі контейнера виступає Microsoft Internet Explorer 4 (або більш пізня версія). За допомогою документів Active можна створити «переносну» версію додатка і працювати з нею на портативному комп'ютері, у далекому офісі або навіть з будинку. Усі працює прямо в броузері. Проте документи Active не слід плутати з Web-сторінками — це самостійні додатки. Крім того, користувачі можуть спокійно переключатися між документами Active і Web-сторінками в броузері.

При розробці додатка документи Active можуть утворювати користувальницький інтерфейс, a Active DLL — виконувати всі необхідні обчислена на задньому плані..

Щоб створити документ Active, виконаєте наступні дії:

1. Створіть новий проект командою File > New Project. Виберіть у вікні Project
Wizard значок Active Document EXE.

2. У вікні властивостей задайте властивості Name документа UserDocument1 значення docMain.

3. Розмістіть список пристроїв у лівому верхньому куті документа docMain. Лівий
верхній кут списку повинен бути вилучений від верхньої і лівої сторін на відстань однієї лінії сітки. Розтягніть список так, щоб його ширина складає приблизно 5 см.

4. Додайте на документ docMain список каталогів і розміну одну лінію нижче списку пристроїв. Розтягніть список так, щоб його ширина збігалася із шириною списку пристроїв, а висота доходила до середини висоти документа.

5. Помістите список файлів безпосередньо під списком каталогів. Розтягніть список так, щоб його ширина збігалася із шириною списку каталогів, а висота на одну лінію сітки не доходила до нижнього краю документа docMain.

6. Тепер помістите на документ графічне поле і задайте його властивості Name значення рісGrарhіс.

7. Розташуєте picGraphiс на одну лінію сітки правіш списку пристроїв. Розтягніть поле так, щоб його правий край на одну лінію не доходив до правого краю документа. Перетягніть нижній край графічного поля так, щоб він збігався з нижнім краєм списку файлів.

8. Двічі клацніть на списку пристроїв, щоб відкрити вікно програми.

9. Додайте наступний фрагмент у процедуру події Change списку Drivel:

Private Sub Drive1_Change()

' Синхронізувати список каталогів зі списком пристроїв

Dirl.Path = Drivel.Drive

End Sub

 

10. Додайте наступний фрагмент у процедуру події Change списку

Dirl:Private Sub Dir1_Change()

'Синхронізувати список файлів зі списком каталогів

Filel.Path = Dir1. Drive

End Sub

 

11. Додайте наступний фрагмент у процедуру події Click списку File1:

Private Sub File1_Click()

'Вивести графічне зображення

picGraphic.Picture = LoadPicture(Dir1.Path & _

"\" & Filer filename)

End Sub

 

На відміну від форм документи Active ініціалізуються в процедурі події Initialize, Поміщаючи в неї програмний код, можна підготувати документ до відображення.

 

12. У своєму документі ми обмежимося переглядом растрових файлів формату
BMP. Додайте наступний фрагмент у процедуру події Initialize документа UserDocument (docMain):

 

Private Sub UserDocument_Initialize()

'Відображати тільки файли формату BMP

Filel.Pattern = "*.bmp"

End Sub

 

13. Додайте останній фрагмент у процедуру події Resize документа User
Document:

 

Private Sub UserDocument_Resize()

'Змінити розміри списку файлів

Filel.Height = (ScaleHeight - Filel.Top)

'Змінити розміри графічного поля

picGraphic.Height = ScaleHeight

picGraphic.Width = (ScaleWidth - picGraphic.Left)

End Sub

 

Приведений вище фрагмент відповідає за те, щоб уміст док завжди виглядало акуратно. При зміні розмірів вікна броузера відбувається автоматичне масштабування документа. Процедура події Resize масштабує графічне поле таким чином, щоб воно вписувалося в документ. Поле розтягується і по вертикалі так, щоб його нижній до падав з нижнім краєм документа.

 

14. Запустите програму командою Run > Start або клавішею F5.

15. На екрані з'являється вкладка Debugging діалогового вікна Project Properties. Зверніть увагу: у списку Start Component указується рядок docMain. Hажміть кнопку ОК.

 

Internet Explorer запускається автоматично і виводить заданий документ. У попередніх версіях Visual Basic приходилося вручну запускати Internet Explorer і завантажувати в ньому файл документа.

Наш перший документ Active готовий. Програма призначена для перегляду графіки формату BMP і працює у вікні броузера. Давайте подивимося, як працює документ:

1. Користуючись списками пристроїв і каталогів, відкрийте каталог \Common\Graphics\Bitmaps\Assorted.

2. Клацніть на кожнім з файлів у нижньому списку — його уміст відобразиться в графічному полі.

 

На цьому наше знайомство з документами Active закінчується. Ви можете удосконалювати цей додаток або створити власне. З часом ви будете всі частіше зустрічатися з різними документами Active в Інтернету і інтрамережах усього світу. Можливості документів Active безмежні.

 

ПРИМІТКА Більш докладну інформацію про документи Active можна знайти в довідковій системі Visual Basic (проведіть пошук із ключовими словами Active document).

 


Дата добавления: 2015-08-21; просмотров: 55 | Нарушение авторских прав


<== предыдущая страница | следующая страница ==>
Предмет-чужое имущество| ДОДАВАННЯ КОДУ

mybiblioteka.su - 2015-2024 год. (0.01 сек.)