Главная              Рефераты - Компьютеры

Контроллер связываемых объектов - реферат

Разработка программы контроллера автоматически связываемых объектов для управления конструкторской документацией в среде Windows 95/NT .

АННОТАЦИЯ

В данной дипломной работе осуществлена разработка программного продукта, для среды операционной системы Windows 95/NT , обеспечивающего создание, изменение и выполнение функций автоматически связываемых объектов систем автоматизированного проектирования или любых других пакетов прикладных и системных программ поддерживающих механизм связывания и внедрения.

Разработанный программный продукт позволяет объединять функции автоматически связываемых объектов систем проектирования в один проект с файлами данных этих систем проектирования, таким образом являясь интеграционным звеном между различными программными продуктами.

В настоящее время на фоне всеобщей компьютеризациивсех производственных, торговых и бытовых отраслей с одновременным увеличением конкуренции на компьютерном рынке, в связи с ускорением разработок все более новых технологий производства вычислительной техники, все большее значение приобретает разработка и производство конкурентоспособной вычислительной техники. Сегодня это становится возможным только при использовании современных средств проектирования электронных вычислительных средств (ЭВС). Современные средства конструирования невозможно представить себе без компьютерных средств проектирования. Компьютеры имеют большой потенциал в области проектированияЭВС.

Компьютерные средства проектирования, кроме непосредственно компьютерного оборудования, включают в себя программное обеспечение. На нынешнем этапе развития программного обеспечения систем проектирования, имеется много разработок систем автоматизации проектирования. Рынок программного обеспечения насыщен большим количеством разнообразных пакетов прикладных программ включающих в себя различные инструментальные средства, позволяющие во многом упростить работу конструктора ЭВА. Сейчас у нас в стране и за рубежом наиболее распространены такие пакеты программного обеспечения, как PCAD, AutoCAD, MicroCAPS, Pspice, MathCad и другие. Эти программные средства позволяют автоматизировать сложные и однообразные процессы присутствующие на многих этапах проектирования ЭВА. Например, различного рода математические расчеты всевозможной сложности, логическое моделирование схем, разработка топологии микросхем, разводка печатного монтажа печатной платы, создание готовых конструкторских документов высокого качества и т.д.

Рост популярности автоматизированных систем проектирования возник во многом благодаря улучшению пользовательского интерфейса программного обеспечения в целом и систем проектирования в частности. За последние несколько лет у разработчиков программного обеспечения все большие симпатии вызывает платформа Windows для создания высоко качественных программных продуктов предоставляющих пользователю наиболее удобный для восприятия интерфейс. Удобство интерфейса Windows обусловлено высокими требованиями с эргономической точки зрения предъявленному создателями Windows к своей операционной системе. Свою систему Windows фирма Microsoft создала для платформы IBM, не случайно. Надо отметить значительную популярность в мире компьютеров совместимых с IBM AT. Ставшей в наше время своеобразным мировым эталоном сочетания качества и низкой цены. Более половины компьютерного рынка принадлежит компьютерам совместимым с IBM AT.

Однако, любой пакет программ не может обеспечить полную универсальность своей системы, но это собственно не к чему. Любое программное обеспечение, благодаря своей специфичности в той или иной области автоматизации проектирования, позволяет получить максимальную эффективность конкретно в своей области. Но, последнее время наметилась тенденция к интеграции программного обеспечения на базе так называемых автоматически связываемых объектов. Этот термин на самом деле означает не интеграцию программ в прямом смысле, а лишь ее эмуляцию. Тем не менее, для конечного пользователя это выглядит как полная интеграция программного обеспечения различных направлений и различных фирм разработчиков программного обеспечения. Идея заключается в том, что любое приложение для Windows, обеспечивающее OLE Automation (Objekt Linking and Embedding Automation - автоматическое связывание и внедрение объектов), может управляться извне другими приложениями, которые пользуются им основываясь на предоставленных приложением программных интерфейсах и таким образом выполнять те же функции, что и приложение прародитель функций.

Задачей данной дипломной работы является разработка универсальной среды проектирования. Для интеграции систем проектирования и позволяющей создавать составной документ, который может включать в себя все виды документов обрабатываемых инсталлированными в данную систему приложениями обеспечивающих OLE Automation, и максимальную эмуляцию OLE Automation для всех остальных приложений. А также выполнять любые функции OLE Automation зарегистрированные приложениями.

1. АНАЛИЗ ТЕХНИЧЕСКОГО ЗАДАНИЯ

1 .1. Выбор и обоснование операционной системы

1.1.1. Графические операционные системы

Наиболее распространенной средой программных продуктов в настоящее время по праву является Windows, разработанная корпорацией Microsoft в расчете на самый широкий круг пользователей.

Windows предлагает пользователю оконный интерфейс, в котором каждой выполняемой программе отводится экранное окно которое может занимать часть экрана или весь экран. Программы, специально спроектированные для таких оконных сред, могут пользоваться всеми их преимуществами. Вид пользовательского экрана с перекрывающимися окнамиразличных прикладных программ достаточно наглядно демонстрируют возможности среды по одновременному использованию нескольких программ и передаче данных между ними (рис. 1.1).

Пользователь работает с приложением, находящимся самом “верхнем” окне, но простым щелчком мыши на другом окне он может активизировать другую программу. Кроме того, уже в своих ранних версиях Windows позволяла копировать информацию из окна одной программы в окно другой программы при помощи средства clipboard - буфера обмена.

Графический режим Windows, как и графический режим любой другой графической операционной среды (WindowsNТ,ОS/2, Soleras, Motif) имеет мало общего с знакоместным графическим режимом, доступным во многих программах для МS-DОS, всегда размещающих на экране стандартное количество символов, например 8Оx25 или 80x43. Windows (а следовательно, и любая Windows -программа) позиционирует графические объекты с точностью до пикселя.

Размеры таких объектов Windows, как элементы окон, кнопки и значки стандартизованы. Для отображения системных сообщений и наименований команд меню Windows применяет соответствующие растровые (матричные) шрифты, имеющие различные типоразмеры для работы в режимах низкого и высокого разрешения. Для подготовки документов, содержащих текст, Windows позволяет использовать масштабируемые шрифты, применяемые как для экранного вывода, так и для распечатки па принтере. Благодаря этому в процессе подготовки документа можно видеть на экране практически то же, что будет получено на бумаге.

Графическая подсистема Windows использует универсальные методы обращения к любым графическим устройствамвывода, будь то видеосистема ЕGА или super VGA, лазерный принтер или автомат для вывода типографских форм. Стандартизован интерфейс Windows, конечно, не с самими дисплеем и принтером, а с драйверами этих устройств, причем драйверов в комплект поставки системы Windows входит великое множество.

Выпуск графической операционной оболочки MicrosoftWindows 3.0 стал главным событием 1990 года на программном рынке, затмившим одновременное появление IBM OS/2 1.3. Кроме приятного пользовательского интерфейса среда Windows предоставляла значительный комплекс услуг.

С системой поставлялось большое количество драйверов для самых разных моделей устройств ввода-вывода, таких как видеоадаптеры и принтеры. Широчайшая аппаратная совместимость была одним из факторов успеха Windows. Комплект Windows 3.0 содержал несколько вариантов драйверов для разных моделей клавиатур, мышей и видеоадаптеров и большое количество драйверов принтеров. В Multimedia для Windows 3.0, а затем в Windows 3.1 появились драйверы звуковых карт, МIDIустройств и синтезаторов. Количество наименований поддерживаемых устройств быстро росло...

1.1.2. Windows 3.Х

С точки зрения массового пользователя, не избалованного OS/2, Windows 3.0 была действительно передовой средой. Она использовала весь объем памяти, адресуемой микропроцессорами 80286, 80386 и выше. С 32-разрядными микропроцессорами (80386 и выше) и при наличии не менее 2 Мбайт памяти Windows 3.0 могла использовать виртуальную память, то есть работать с некоторым пространством на жестком диске как с продолжением оперативной памяти компьютера, размещая в нем данные и код программ.

Windows имела многозадачные возможности с кооперативным использованием процессорного времени “одновременно” работающими приложениями. Кооперативную

многозадачность можно назвать многозадачностью “второй ступени” поскольку она использует более передовые методы, чем .простое переключение задач, реализованное многими известными программами (например, МS-DOS shell из МS-DOS 5.0 при простом переключении активная программа получает всепроцессорное время, а фоновые приложения полностью замораживаются. При кооперативной многозадачности приложение может захватить фактически столько процессорного времени, сколько оно считает нужным. Все приложения делят процессорное время, периодически опрашивая друг друга.

С другой стороны, режим кооперативной многозадачности менее совершенен, чем режим разделения времени, называемый также вытесняющей многозадачностью. При вытесняющей многозадачности программы потребляют ровно столько процессорного времени, сколько им положено, а не сколько заблагорассудится. За выделение процессорного времени тому или иному приложению отвечает только операционная система, руководствуясь текущими приоритетами. Благодаря этому при вытесняющей многозадачности можно в любой момент переключиться на любой процесс, в отличие от кооперативной многозадачности, при которой для переключения между программами может потребоваться существенная пауза. При вытесняющей многозадачности кажется, что процессы действительно работают одновременно, хотя это на самом деле и не так, - во всяком случае, на компьютере с одним микропроцессором, каким является обычный IВМ РС.

С апреля 1992 года Windows 3.1 официально именуется операционной системой. Интерфейс ее был несколько улучшен, в частности были усилены возможности управления экранными объектами мышью (Drag - and - drop метод перетаскивания). Windows стала непосредственно поддерживать динамический обмен данными между приложениями (DDЕ - Dynamic Data Exchange ). В систему вошли средства мультимедиа, ранее поставлявшиеся отдельно в пакете WindowsMultimediaExtension. Для расширения издательских возможностей в Windows была встроена поддержка системы масштабирования шрифтов TrueType.

Windows 3.11 for Workgroups (“для рабочих групп”) позиционировалась как самостоятельная сетевая операционная система для одно-ранговой локальной сети, а также как сетевой клиент для сервера WindowsNТ. В остальном Windows 3.11 для рабочих групп являлась слегка улучшенной модификацией Windows 3.1, работающей только в 386-м Расширенном режиме на 32-разрядных микропроцессорах.

А теперь мы постараемся разобраться в том, как устроена Windows.

Режимы работы Windows 3 . X Чтобы запустить мотор Windows на полную мощность, конечно, нужны прежде всего мегабайты и мегабайты оперативной памяти. Но их невозможно использовать на микропроцессорах 8088/86. Не слишком удачным решением был и защищенный режим 80286: для того чтобы использовать на компьютере приложения для новой операционной среды вместе с МS-DOS приложениями, приходилось переключать микропроцессор из защищенного режима в реальный и обратно.

Здесь уместно вспомнить о том, что фирма Microsoft весьма тесно сотрудничала с Intel во время разработки микропроцессора i80386. Microsoft фактически навязала инженерам Intel собственную концепцию режима виртуального микропроцессора 8086-V86, наиболее удобную для разработки операционной системы, использующей МS-DOS приложения вместес программами защищенного режима. Поскольку в 1990 году рынок еще не был готов к полному переходу на операционную систему для микропроцессора 80386, Windows 3.О могла функционировать в трех режимах, в каждом из которых микропроцессор и память использовались по-разному.

В реальном режиме работы Windows система функционировать даже на компьютере с микропроцессором 8088 или 8086, оборудованном только обычной памятью для работы приложений в реальном режиме Windows 3.0 использовалась только обычная память МS-DOS и отображаемая память.

Стандартный режим Windows 3.0 требовал для работы микропроцессор 80286 и всего 1 Мбайт памяти - 640 Кбайт стандартной и 384 Кбайт дополнительной (настоящая работа начиналась при объеме памяти 4 Мбайт). Для приложений Windows использовалась расширенная память (ХМS). Для программ МS-DOS, загружаемых из-под Windows, применялась обычная память и переключение микропроцессора из защищенного режима в реальный.

Более полно использовал аппаратные ресурсы 386-й Расширенный режим Windows . В этом режиме версии Windows 3.0 и 3.1 работали с виртуальной памятью, имевший примерно втрое больший объем, чем физическая оперативная память. Приложениям МSDOS в 386-м Расширенном режиме отводилась произвольная область памяти, которая в виртуальном режиме 8086 размечалась как обычная память MS DOS . По умолчанию МS-DOS программы загружались занимая, как обычно, весь экран, но могли быть переведены в графическое окно - стандартное окно Windows. Приложения МS-DOS, запущенное из-под Windows в 386-м Расширенном режиме, работало в виртуальной машине, иными словами, считало себя загруженным на своем собственном компьютере и знать не знало о существовании Windows.

Разумеется, для работы в 386-м Расширенном режиме требовался компьютер с микропроцессором не ниже 80386. Объявленные требования к объему памяти (2 Мбайт) опять-таки не стоило принимать всерьез. Минимумом являлись 4 Мбайт памяти, а для более или менее серьезной работы требовались 8 Mбайт или больше.

Структура ядра Windows . Способ, при помощи которого одна и та же система может работать в трех принципиально разных режимах, ориентированных на совершенно разные микропроцессоры, заключается в следующем.

Ядро Windows состоит из трех компонентов Kernel ,User и GDI. При помощи дополнительных DLL-файлов (динамически загружаемых библиотек) поддерживаются отображением стандартных диалоговых окон, протоколы DDЕ (динамического связывания данных) и ОLЕ (связывания и встраивания объектов), взаимодействие с драйверами устройств ввода-вывода и другие черты Windows. Windows -драйверы устройств бывают, кстати, двух видов - “обычные” DLL-драйверы и 386драйверы, последние предназначены опять-таки для работы только в 386-м Расширенном режиме Windows.

Наиболее низкоуровневой частью ядра Windows являетсямодуль Kernel, управляющий распределением памяти, процессами, файловым вводом-выводом и так далее. В разных режимах работы Windows 3.О функции Kernel выполняли различные файлы: kernel.ЕХЕ для Реального режима krnl286.Еxe для Стандартного режима, КrnlЗ86.ЕХЕ для 38б-го Расширенного режима.

Так что Windows 3.0 была разработана как операционная система, имеющая три разных ядра. Когда был упразднен Реальный режим работы, из комплекта поставки Windows 3.1 и исчез файл Kernel.dll. Следующий шаг был сделан, Windows 3.11 для рабочих групп - эта система работала только в 386-м Расширенном режиме. Модуль User (user.ЕХЕ) служит для работы с клавиатурой, мышью, таймером и портами, а также выполняет функции отображения элементов графического интерфейса (окон, меню). Он управляет такими драйверами, как, например, различные драйверы клавиатуры и мыши.

Наконец, модуль GDI(интерфейс графических устройств, файл GDI.ЕХЕ) поддерживает графические процедуры - прорисовку линий, закрашивание, отображение шрифтов (начиная с Windows 3.1 - все операции со шрифтами TrueType) и взаимодействует с драйверами графических устройств - дисплея и принтера. С Windows 3.1 поставлялось более десятка драйверов видеоадаптеров. Для поддержки принтеров в Windows 3.1 впервые была применена архитектура мини-драйверов. Универсальный драйвер принтера NIDRV.DLL выполнял аппаратно-независимые функции печати -несколько десятков мини-драйверов, поставляемых производителями, дополняли универсальный драйвер функциями обходимыми специально для поддержки конкретных устройств и не повторяли уже написанный общий код.

1.1.3. Windows 95

В 1996 году фирмой Microsoft , была выпушена следующая версия операционной системы Windows. Которая была названа фирмой 32 разрядной многозадачной графической системой. / 1 /

Архитектура Windows 95. Что должна была сделать Microsoft, чтобы прийти к 32-разрядной операционной системе с обеспечением вытесняющей многозадачности, которая бы при этом оставалась полностью совместима с прикладными программами для Windows3.x и MS-DOS, не требовала бы для работы самой МS DOS и “умещалась” в четырех мегабайтах оперативной памяти ?

Фирмой Microsoft уже выпущены системы, удовлетворяющие самым серьезным требованиям к управлению памятью и процессами, - WindowsNТ SERVER и WindowsNТ workstation (выпущены версии 3.51 и готовятся к выпуску 3.52), Однако эти системы сами предъявляют серьезнейшие требования к аппаратуре, а заодно и к пользователю. WindowsNТ SERVER предназначается не для десятковмиллионов потребителей Windows, а для сетевого администрирования. WindowsNТ workstation нужна тем пользователям, которые используют приложения с высокой интенсивностью вычислительной обработки, тем, кто нуждается в высокой степени безопасности данных, и тем, кто больше беспокоится о надежности системы, чем о совместимости с приложениями для MS DOS и Windows3.x.

Всех остальных пользователей на порядок больше, и им нужнее “легкая” система.

Ядро Windows 95. Ядро Windows 95, как и во всех предыдущих версиях Windows, имеет трехуровневую структуру Kernel -User- GDI. Все эти модули должны бы быть 32-разрядными, но в действительности полностью 32-разрядной сделана только самая низкоуровневая часть ядра Windows 95 - Кегне1. Вполне понятно, что, объявляя о 32-разрядной системе, Microsoft обязана была выполнить в 32-разрядном коде хотя бы такие базовые вещи, как функции ввода- вывода, управления памятью и процессами, поддержку сетевой и файловой систем.

Что касается двух других модулей ядра, то расчеты показали, что полностью 32-разрядные USER и GDI вместе потребуют для работы более 1 Мбайт памяти, Windows 95 использует 1б-разрядный код, когда он необходим для обеспечения совместимости или если 32-разрядное кодирование нецелесообразно, то есть увеличило бы расход памяти без заметного увеличения производительности.

Поэтому модуль User, остался в Windows 95 преимущественно 1б-разрядным, а его 32-разрядная часть используется для переадресации вызовов 32-разрядных приложений 16-разрядному блоку. Большая часть функций ОВ1, включая подсистему буферизации входных и выходных потоков, подсистему печати, растеризатор шрифтов TrueТуре и основные операции рисования, перенесена в 32-разрядный модуль, оставшийся 16-разрядный код описывает управление окнами. 16-разрядные функции ядра Windows 95 написаны преимущественно на ассемблере .Что же касается Kernel, то его 16-разрядная часть задействуется только при загрузке Windows 95 и используется только для инициализации 32-разрядной части Kernel. Сам Kernel32 никогда не обращается к Kernel16. На рис.1.2.показано, для каких функций используется 32-разрядный код, а для каких 16-разрядный код модулей ядра Windows 95.

Многозадачность. Анализируя выполнение под Windows 95 16-разрядных приложений для Windows3.x и МS-DOS, мы видим по большейчасти знакомые, хотя и серьезно улучшенные методы Windows3.x.

Как показано на рис. 1.3., 16-разрядные приложения для Windows (“приложения win16”) выполняются в общем пространстве адресов в пределах системной виртуальной машины. Такие варианты, как выполнение каждого приложения win16 в отдельной виртуальной машине (чтовозможновОS/2) или полная эмуляция Windows3.x в пределах операционной системы (как это делается в Windows NТ).

32-разрядные приложения, созданные с учетом требований Windows 95 (“приложения win32”), выполняются в режиме “подлинной” вытесняющей многозадачности. Кроме того, Windows 95 поддерживает многопоточные приложения, способные запускать параллельно несколько процессов.

Для каждого win32-приложения и для области адресов приложений win1б используются отдельные очереди сообщений. Таким образом, приложения win16 фактически изолированы от остальных процессов. Кроме того, в Windows 95 примененные методы очистки и восстановления системы в случае ошибок. Если ошибка в программе, выполняющейся под Windows3.x, могла запросто “обрушить всю” систему, то ошибка в одном из приложений под Windows 95 обычно не влияет на выполнение остальных программ. Низкоуровневые компоненты операционной системы изолированы от прикладных программ, поскольку пользуются сервисом другого уровня защиты микропроцессора 80386.

Использование памяти. Для разработчиков программного обеспечения 1ВМ РС долгие годы оставалась камнем преткновения сегментированная модель памяти 1б-разрядных микропроцессоров 8088/86 и 80286.

Сегментом является непрерывная область памяти, адресуемая 16-разрядными числами ( 64 Кбайт ). Для того чтобы использовать более б4 Кбайт памяти, пришлось разработать систему адресации памяти при помощи двух чисел - адреса начала сегмента и 1б-разрядного смещения внутри сегмента. Микропроцессоры 80386, способные оперировать 32-разрядными адресами, могли бы без всяких премудростей ( и отнимающих время вычислений! ) адресовать до 4 Гбайт, оперативной памяти, Но МS-DOS и Windows3.x вынужденно продолжали использовать устаревшую сегментированную модель памяти.

Для win32-приложений доступна плоская ( несегментированная) модель памяти Windows 95. Система полностью использует адресуемую память 38б-х процессоров, при этом прикладные программы могут работать с объемом памяти до 2 Гбайт, остальные 2 Гбайт Windows 95 использует для собственных нужд. Файл виртуальной памяти Windows 95 имеет динамический размер, ограниченный только объемом жесткого диска и не зависящий от фрагментации.

Использование системных ресурсов . Под системными ресурсами в терминологии Windows понимают области памяти, используемые модулями USER и GDI. В ресурсах GDI располагается информация о графических объектах, используемых системой в данный момент. Ресурсы USER включают информацию об окнах, меню и так далее. Для того чтобы максимально ускорить процедуру обращения к ресурсам USER и GDI, в Windows3.x их объемы ограничили сегментами по б4 Кбайт. Каждое порожденное системой окно отнимало примерно 2% системных ресурсов, а когда процент свободных системных ресурсов падал до 20%, загрузка новых приложений становилась невозможной.

Большая часть ресурсов Windows 95 хранится в областях памяти с 32-разрядной адресацией, Соответственно объем ресурсов Windows 95 практически неограничен. Те из старых Windows -программ, которые непосредственно обращаются к системным ресурсам, могут использовать их под Windows 95 так же, как и прежде.

Файловая система .Одно из самых назойливых ограничений систем МS-DOS и Windows3.x - имена файлов, состоящие не более чем из 11 (8+3) символов. Новая файловая система позволяет win32-приложениям пользоваться длинными (до 255 символов) именами файлов и при этом остается полностью совместимой с FAT. Разумеется, пользоваться такими именами файлов гораздо удобнее.

Некоторые компоненты новой файловой системы были использованы еще в Windows 3.11 для рабочих групп - драйвер устанавливаемых файловых систем, 32-разрядный драйвер FАТ,32-разрядное кэширование жесткого диска. Все эти черты получили дальнейшее развитие в Windows 95. Кроме того, появились 32-разрядный драйвер CD-ROM, более мощная подсистема блокового ввода-вывода и другие черты.

Поддержка драйверов устройств . аиболее громоздкие МS-DOS драйверы, занимавшие больше всего места в базовой памяти или UMB, теперь не нужны при использовании оболочки защищенного режима. Согласно документации Microsoft система Windows 95 обеспечивает:

· полную поддержку разделения доступа к файлам, заменяя резидентную программу SНАRЕ.ЕХЕ;

· полную поддержку разнообразных звуковых плат,СD-ROM приводов и других мультимедиа-устройств,не требуя при этом установки МS-DOS драйверов;

· поддержку файловой системы СD-RОМдисков, заменяя MSCDЕХ.ЕХЕ;

· кэширование дисков, заменяя SMARTDrive;

· работу с мышью не только в графической среде, но и с MS-DOS-программами, заменяя драйвер мыши для MS-DOS;

· динамическое сжатие данных, заменяя DRVSpace.BIN (DBLSPACE.BIN);

· полную поддержку работы станции в локальных сетях MS-NЕТи Novell Netware, заменяя все резидентныепрограммы, которые приходилось загружать для работы в этих сетях.

Windows 95 поддерживает текущую версию протокола Plug-and-Play. При установке дополнительного устройства, подключаемого на основе Plug-and-Play, система сама заботится о его конфигурировании.

Достаточно удобно использовать Windows 95 и без аппаратной поддержки Plug-and-Play - система чрезвычайно много знает о том, какие существуют внешние устройства и как идентифицировать, включая СD дисководы, звуковые картымодемы, мыши и многое другое.

Графическая оболочка Windows 95. Интерфейс Windows 95 соответствует требованиям самых придирчивых пользователей, дизайнеров и специалистов по эргономике. На мой взгляд, интерфейс Windows 95 великолепен, и перейти на эту систему стоило бы даже в том случае, если бы новым в ней был только интерфейс.

Современный пользовательский интерфейс . Облик оболочки Explorer, основанный на полноценном воплощении метафоры рабочего стола и папок, удобен и нагляден. Панель задач дает полный обзор приложений, выполняемых системой в данный момент. Доступ ко всем объектам, будь то программы, документы, сетевые ресурсы или инструменты настройки системы, унифицирован. Имена любых объектов могут содержать до 255 символов.

Богатый сервис . Оболочка Windows 95 предоставляет пользователю богатый и разнообразный выбор рабочих инструментов. В качестве примера назову возможность создания так называемых ярлыков для быстрого доступа к необходимым приложениям и документам, весьма удачное средство поиска документов и встроенную программу быстрого просмотра документов различных форматов. Выполнение многих действий, включая установку аппаратных компонентов, отправку почтовых и факсимильных сообщений, установление связи между компьютерами, автоматизировано при помощи специальных программ-мастеров .

Широкие возможности настройки. Windows 95 можно настроить сотнями способов, причем доступ к средствам настройки пользование ими весьма просты.

Удобство работы с документами. Windows 95 - это следующий шаг к интеграции различных прикладных программ одну рабочую среду. Можно легко создавать документы средствами оболочки, переносить данные из документа на рабочий стол и в другой документ, выбрасывать в “мусорную корзину” фрагменты текста, документы или целые папки, а при необходимости - возвращать их.

Усовершенствованная справочная система. Справочная система Windows стала удобнее и гибче. Многие разделы справки составлены в виде пошаговых руководств с возможностью выполнения тех или иных рекомендуемых действий непосредственно из системы помощи.

Эмуляция MS-DOS . MS-DOS 7.0 + Windows 4.0. Покинуть оболочку Windows 95 для работы с МS-DOS программами в реальном режиме можно, только инициировав перезагрузку или отключение системы или же перейдя в режим эмуляции МS-DОS (МS-DOSmode) с возможностью возврата в графическую оболочку по команде ЕХIТ. Похоже, что нормальным состоянием Windows 95 действительно являетсяграфический интерфейс, который всегда находится где-то под рукой, в памяти компьютера. Но это не так.

В действительности “режим эмуляции МS-DOS” представляет собой классическую МS-DOS, работающую в реальномрежиме и адресующую 640 Кбайт оперативной памяти. Графическая система Windows 95 со всеми своими преимуществами по-прежнему является оболочкой защищенного режима для MS-DOS. Даже новейшие 32-разрядные графические приложения для Windows 95 продолжают использовать для выполнения отдельных операций функции МS-DOS и базовую область памяти.

Таким образом, определение MicrosoftWindows 95 как операционной системы, не требующей отдельной копии МS-DOS,основано на том, что Windows 95 включает в себя все, что ей нужно от МS-DOS. Ничто лучше МS-DOS не поддержит MS-DOS-приложения, именно в МS-DOS лучше всего чувствуют себя те 16-разрядные драйверы устройств, которые все-таки приходится загружать (например, драйверы сканеров).

При этом весь комплекс сделан так, что обычному пользователю вроде бы и незачем что-то знать о МS-DOS, а квалифицированный пользователь, напротив, сможет применять как новые, так истарые, испытанные методы работы с системой.

1.2. Анализ механизма связывания и внедрения

Научно-технический прогресс 90-х годов обусловил неуклонный рост популярности объектно-ориентированного программирования (ООП), и в настоящее время многие программисты перешли в своей работе на С++ или Visual Basic. Уже существуют объектно-ориентированные базы данных, объектно-ориентированные дизайн и анализ и даже объектно-ориентированный СОВОL. На естественно возникающий вопрос -не остались ли Windows или операционные системы в объектно-ориентированном отношении далеко позади. Безусловно, нет. Продукт OLE ( Objekt Linking and Embedding ) компании Microsoft открывает новые путидля применения объектов в Windows. ОLE предполагает новый способ мышления. Программист в среде ОПП должен мыслить обо всем как об объектах - от файла на диске, элемента данных или приложения до аппаратного обеспечения и операционной системы. Кроме того, OLE заставляет программиста следовать строгому набору правил, на зависящих от языка программирования, операционной системы или даже от аппаратной платформы.

Введение в OLE . OLE служит основанием, на котором строятся объекты. Эта аббревиатура означала изначально связывание и внедрение объектов (Objekt Linking and Embedding) с выпуском версии ОLE 2 применение ОLE уже не укладывается в рамках, связывания и внедрения. ОLЕ сегодня включает в себя унифицированную передачу данных, структурированное хранилище информации и автоматизацию. Не следует сужать представление об ОLЕ связыванием и внедрением; смотреть на ОLЕ следует как на набор строительных блоков, позволяющих создавать сложные приложения. На самом деле Microsoft перестала расшифровыватьаббревиатуру ОLE как Objekt Linking and Embedding, чтобы изменить сложившееся восприятие ОLЕ.) / 2 /

Предназначение и история О L Е. Если до появления OLE 1 у пользователя Windows имелась электронная таблица, которую ему нужно было вставить в документ текстового редактора, обыкновенно он должен был экспортировать данные из таблицы в файл стандартного формата, импортировать данные из файла в текстовый редактор, а затем в редакторе их переформатировать. Если пользователю везло и оба приложения поддерживали копирование и вставку, то вместо явного экспорта/импорта он мог копировать информацию через буфер Clipboard. Всякий раз, когда электронные таблицы изменялись, процесс переноса данных нужно было повторять. Это, естественно, приводило к лишней затрате времени и сил.

Но незадолго до выхода Windows 3.1 появилось ОLE 1, и этозначительно упростило описанную использования общих данных в подобных приложениях (если они умели работать с ОLЕ). На смену операциям экспорта/импорта и копирования пришли связывание и внедрение. Стало возможным так подключить электронную таблицу к текстовому редактору, чтобы документ редактора отражал самые последние изменения, произошедшие в электронной таблице. Кроме того, электронная таблица (которая появилась в текстовом документе) может быть выбрана нажатием кнопки мыши. При этом автоматически запускается приложение электронной таблицы, позволяющее выполнять редактирование данных или другие специфические для таблиц операции. Команда Update закрывает электронную таблицу, и обновленная электронная таблица внедряется в документ текстового процессора.

OLE 2 является следующим логическим шагом в развитии этой стратегии. В ОLE 1 нажатие кнопки на электронной таблице, находящейся в документе текстового документа, приводило к запуску приложения в отдельном окне. В ОLЕ 2 вводится понятие активации по месту (также известное под названием визуального редактирования). Приложение электронной таблицы запускается как и прежде, но вместо отдельного окна электронная таблица как бы сливается с текстовым редактором. Изменяется меню, отражая меню электронной таблицы. Изменяется даже инструментальные линейки, но вы все равно находитесь в текстовом редакторе. Два приложения как бы соединяются и текстовый редактор приобретает функциональные возможности электронной таблицы. Так пользователю нужды переключаться для просмотра данных с одного приложения на другое; вы можете работать с приложением, которое удовлетворяет большинству ваших потребностей, и внутри него использовать возможности других приложений.

Для ОLE 2 пришлось переделать заново многое из существовавшего в ОLE 1 чтобы расширить его функции и улучшить производительность. Например, ОLЕ 1 построено на динамическом обмене данными (DDЕ). Для передачи информации туда и обратно DDE в своей основе использует сообщения Windows и возвратные вызовы. Поскольку используются сообщения Windows, DDЕ ограничивается рамками одной машины. OLE2 не опирается на DDE вместо этого оно построено на протоколе LPRC (Lightweight Remote Procedure Calls - легких удаленных процедурных вызовах).

Архитектура О L Е. Чтобы достигнуть своих задуманных функциональных возможностей, ОLE в качестве строительных блоков использует большое количество объектов. OLE содержит новые объекты для реализации таких концепций, как формировка (marshaling), которая обслуживает коммуникацию между процессами и опирается на LPRC; структурированное хранилище, которое обеспечивает хранение документов, содержащих другие документы; ярлык (moniker), управляющий подключением и переключением связанных данных. Каждый из этих механизмов необходим ОLE для выполнения своей работы.Кроме того, ОLE вводит понятие автоматизации, которое не требуется для связывания и внедрения в традиционном смысле. Автоматизацию можно понимать как способ, посредством которого пользователь может работать с вашим приложением внутри определенного им самим макроязыка. Сервер-автомат OLЕ управляется любым автоматным контроллером OLE (см. таблицу).

Приложения-автоматы - серверы и контроллеры.

Продукт Автоматный сервер Автоматный контроллер
Visual Basic да да
Exel да да
Word 6.0 да нет
AutoCad 12LT да нет
PhotoShop 3.0 да нет
CorelDraw 5.0 да нет

Приложения которые одновременно являются и серверами и контроллерами могут как управляться из вне, так и управлять другими приложениями. В традиционном программировании приложение либо сервер, либо контроллер, но не одновременно и то и другое. OLE вынуждает расстаться с таким способом мышления и предоставляет разработчику приложения право выбора - будет ли его приложение сервером или контроллером.

Объекты. Под понятие о6ьекта ОLЕ попадает все, что может иметь машинное представление. Объектом может быть документ текстового процессора, рисунок или чертеж, также часть чертежа (допустим какой либо слой чертежа печатной платы), видео-клип, звук или даже приложение. Такое понимание расходится со стандартной интерпретацией, в которой объекты - данные, над которыми производятся манипуляции посредством функций и процедур. Хотя OLE поддерживает объекты только в рамках одной машины, это не ограничение архитектуры OLE, а лишь ограниченность ее реализации. Уже демонстрировалась версия OLE, названная распределенным ОLЕ, в которой границы между машинами для объектов прозрачны. Другими словами, если ваше приложение запрашивает OLE-объект, то поставщик этого объекта не обязательно находится на вашей машине, хотя с точки зрения вашего приложения ОLE -объект - локальный.

Интерфейсы. OLЕ интерфейс - это механизм, используемый для доступа к группе связанных с объектом функций. Если вы хотите выполнить в OLE операцию над объектом, можно запросить специфический интерфейс, имеющий нужную вам функцию. Когда вы запрашиваете интерфейс, то обращаетесь к объекту, указывая его ID-номер. Каждый интерфейс имеет уникальный номер-идентификатор (Interface ID или IID). Объект возвращает либо состояние ошибки, если объект не поддерживает запрашиваемый интерфейс или происходит другая ошибка, либо он возвращает указатель на требуемый интерфейс.

Компонентная модель объекта . Компонентная модель объекта (также известная под аббревиатурой СОМ) - это спецификация, определяющая связующий ОLЕ клей. СОМ определяет, каким образом объекты взаимодействуют. СОМ предусматривает для объектов ОLЕ такую специфику, в частности диктуя, какиеинтерфейсы объекту необходимы, как объект может быть создан и когда он может быть уничтожен.

Структурированное хранилище. Структурированное хранилище - это спецификация, определяющая метод хранения объектов. Структурированное хранилище можно представить себе как OLE-аналог DOS. Этот механизм поддерживает большинство из функций DOS - файлы и каталоги, копирование и перемещение файлов (файлы называются потоками, а каталоги - хранилищами. Кроме того, термин “структурированное хранилище” информациине подразумевает, что данные хранятся на диске. Так же как и файлы DOS, которые могут находится на RAM-диске, жестком диске, флоппи-диске или даже на CD-ROM, объекты, размещенные в структурированном хранилище, могут находиться в любом из этих мест, а также и в других. Чтобы DOS могла использовать для хранения информации другие устройства, такие, как оптический флоппи-диск или сетевой диск, обычно нужен драйвер устройства. Структурированное хранилище информации также имеет методы для поддержки нестандартных устройств.

Составной документ является специальным случаем структурированного хранилища, предназначенного для хранения наборов объектов в приложениях-контейнерах (контейнерные приложения - это приложения которые используют и сохраняют объекты).

Автоматизация . OLE-автоматизация - это надзор интерфейсов, в типичном случае псзволяющий использовать приложение в качестве ОLЕобъекта. Автоматизация возможна не только для приложений в форме исполняемых модулей (ЕХЕ), но и для динамически присоединяемых библиотек (DLL). Автоматизация позволяет посредством набора определенных правил извне запрограммировать или специализировать приложение. Это дает приложению, например, VisualBasic, возможность управлять Exel, в результате чего функции Ехсеl становятся доступны вашему приложению на Visual Basic. Автоматный контроллер OLE управляет объектами-автоматами через посредство автоматного сервера.

Унифицированная передача данных. Унифицированная передача данных - это набор интерфейсов, которые позволяют клиенту и серверу обмениваться данными. Она является DDE-эквивалентом и функций буфера cut/сору/paste, собранных воедино. Унифицированная передача данных посылает уведомление в случай если данные изменяются (подобно связи DDE), а также поддерживает переговоры о формате, в котором данные будут передаваться. Кроме того, унифицированная передача данных предусматривает возможность передачи одного лишь дескриптора (handle) данных вместо самих данных. Объект-сервер может решить, что вместо передачи 20 Мбайт данных в оперативную память через буфер обмена объекту-клиенту будет передан дескриптор данных, чтобы клиент сам мог их получить. Это избавляет сервер от необходимости чтения всех данных и передачи их клиенту, а клиента от необходимости самостоятельной обработки данных. Это также избавляет конечного пользователя от сидения перед экраном компьютера в ожидании окончания обмена.

Связывание и внедрение ( Linking and Embedding ). Связывание и внедрение - два принципа, которые по традиции известныв OLE (Objekt Linking and Embedding)лучше всего. Связывание и внедрение (вместоэтого теперь говорят просто о документах ОLЕ) позволяют объекту-клиенту (который может быть другим приложением) прикрепиться к объекту-серверу. Присоединение может либо осуществляться связыванием (данные находятся вне составного документа), либо данные могут внедряться внутрь составного документа. Внедренные данные сохраняются непосредственно в документе, в то время как при связывании для доступа к данным OLE в действительности сохраняет своего рода дорожную карту. Дорожной карта называется ярлыком (moniker). Когда ОLЕ получает запрос на восстановления данных, оно смотрит на ярлык (дорожную карту), чтобы их отыскать. Связанные данные могут храниться в не принадлежащем ОLЕ файле или в структурированном хранилище (возможно даже, что данные находятся где-то в самом составном документе).

Составной частью связывания и внедрения является способность OLE выполнять активацию по месту. В OLE 1 при двойном нажатии кнопки мыши над связанным или внедренным объектом запускается сервер этого объекта. В ОLЕ 2 возможна активация по месту. Для пользователя два приложения являются как бы одним. Активация по месту присоединяет нужные части приложения сервера (такие, как пункты меню и инструментальные линейки) к приложению клиента, когда пользователь работает с внедренным объектом. При двойном нажатии кнопкой мыши над внедренным объектом происходит преобразование приложения клиента, в нем изменяются меню и линейки инструментов, а также прочие элементы интерфейса, для работы с приложением сервера внедренного объекта. При двойном нажатии кнопкой мыши над связанным объектом приложение сервер запускается в отдельном окне (как в OLE 1).

В терминах OLE описанное выше действие (двойное нажатие для активациисервера) называется активацией извне (outside-in). При активации извне сервер объекта не активируется (не запускается), пока пользователь не нажмет над объектом кнопку мыши дважды. Активация изнутри (inside-out) требует, чтобы объект-клиент активировал объект-сервер всегда, когда объект-сервер виден. Сервер принимает управление по однократному нажатию кнопки мыши - потому, что для активируемых изнутри объектов он уже запущен заранее.

Как можно видеть, архитектура ОLE достаточно богата, а связывание и внедрение - лишь часть общей структуры.

1.3. Выбор и обоснование языка программирования

Сегодня в связи с все более ускоряющимися технологиями программирования, постоянно повышаются требования к среде и к самому языку программирования. Наиболее злободневные требования можно описать таким образом.

1. Отделение элементов программы, связанных с пользовательским интерфейсом от алгоритмической части. Это позволяет минимизировать или вообще избежать при правильном проектировании проекта изменений в алгоритмической части проекта при модернизации пользовательского интерфейса вне зависимости от причин их вызывающих: требование заказчика проекта по замене неверной надписи или кардинальной смены концепции вследствие перевода разработок на другую платформу.

2. Простота и скорость создания/модернизации пользовательского интерфейса и самих программ, путем использования уже готовых элементов (блоков), реализующих некие крупные функции взаимодействия с человеком или другой программой.

3. Еще раз простота, а также ясность и наглядность при программировании пользовательского интерфейса, скрывающая нижний, сложный слой и оставляющая на поверхности только малую, но самодостаточную необходимую часть айсберга управления элементами интерфейса.

4. Использование уже существующего кода, возможно, написанного на другом языке программирования.

При разработке приложений для Windows вышеизложенным принципам очень удачно соответствует Visual Basic. Основные свойства этого языка программирования приведены ниже.

Возможности Visual Basic.

1. Все элементы пользовательского интерфейса можно создавать / модернизировать / удалять без всякой связи с алгоритмической "невидимой" частью программы. Все, что связано с взаимодействием с человеком или другим субъектом управления, находится в файлах форм (FRМ), VВХ и ОСХ, а все, что связано с расчетной частью, - в файлах стандартных модулей (ВАS) и классов(СLS), или, если нужна скорость обработки - в специально написанных на С, Pascal, Fortran или других язык программирования, DLL. Но это разнесение на самом деле чисто условно и делается просто с целью облегчения работы самому разработчику или, что более важно, - группе разработчиков. На самом деле, при небрежном проектировании или небольшой поставленной задаче и интерфейсная и алгоритмическая часть могут располагаться в одном модуле (FRМ или ВАS).

2. Формирование пользовательского интерфейса в Visual Basic похоже на работус детским конструктором - все элементы на виду, все элементы просты, носложность создаваемой конструкции ограничена только изобретательностью разработчика. Причем надо иметь ввиду, что число элементов этого конструктора постоянно и очень быстро растет. Сотни (на начало 1995 года около тысячи) сторонних производителей и фирм постоянно выбрасывают на рынок все новые, более мощные модели расширения для Visual Basic.

3. Если уже имеется готовый алгоритм БПФ (Быстрого Преобразования Фурье)на ассемблере или алгоритм быстрого поиска в отсортированном списке на С или Pascal, не надо переписывать их на Visual Basic. Достаточно оформить ихвиде DLL и использовать как функции.

4. Можно с помощью Visual Basic для Windows создавать запускаемые “.EXЕ” файлы.Visual Basic для Windows создает выполняемые (“. ЕХЕ”) файлы, ноне самодостаточные. Все программы, созданные на Visual Basic, должны распространяться с файлом VBRUNx00.DLL (x - номер версии 1,2 или 3)или VB400xx.DLL (xx - 16 или 32). Эта DLL обязательно должна присутствовать в каждой системе, где используются программы на Visual Basic для Windows.

Visual Basic дает возможность создавать приложения, работающие среде Windows. Программы компилируются в псевдокод (р-коде) и помещаются в файлы с расширением “.ЕХЕ”. Когда программа запускается,файл с р-соdе обращается к VBxxxx.DLL, которая интерпретирует р-code в последовательность инструкций Windows АРI.

5. Использование функций Windows АРI в Visual Basic довольно просто- необходимо ее объявить (declare) всекции объявлений или модуле кода.

Windows АРI - набор DLL,содержащих функций общего назначения среды Windows. Вызов функцийАРI позволяет выполнить множество вещей,включаяотображениеменю,манипуляции с изображениями,проигрыш музыкального фрагмента и т.д.

6. Используемый механизм добавления элементов управления VВХ ( Visual Basic eXtension - модули расширения Visual Basic) явил собой "черный ход" для разработчиков третьих фирм по внедрению собственных объектов в среду разработки Visual Basic. Механизм, пусть и не объектно-ориентированный, но позволяет просто и довольно элегантным путем добавлять новые программные компоненты без дополнительного программирования.Механизм VВХ является специфическим интерфейсом для Visual Basic.

7. Существует открытый стандартный интерфейс для работы с программными компонентами, в каждую программу и приложение можно интегрировать стандартный набор средств, позволяющий использовать в дальнейшем данные программы в виде компонент для будущих приложений. Механизм ОLЕ и новая технология в виде ОСХ (ОLЕ CustomControl). ОLЕ не только предлагает стандарт в определении объекта, но также определяет, как и каким образом объекты могут взаимодействовать друг с другом. / 3 /

Основные новшества в Visual Basic версии 4.0

· наличие 16- и 32-разрядной редакции;

· работа в среде Windows 3.1, Windows для Рабочих Групп 3.11, Windows 95, WindowsNТ;

· возможность создания ОLЕ Automation объектов;

· поддержка OСХи VВХ;

· расширение ТооlВох (Окно Инструментария) за счет ОLЕ Insertable объектов;

· использование JЕТ версии 2.5;

· наличие новых и поддержка специализированных Data Bound Control (объектов, значительно упрощающих работу с базами данных);

· использование ВАО версии 2.0;

· открытая и расширяемая среда разработки;

· возможность разбиения длинных строк в программном коде;

· расширение лексики языка программирования;

· запуск одновременно нескольких копий Visual Basic 4.0;

· директивы условной компиляции;

· поддержка файлов-ресурсов;

· создание 32-разрядных приложений;

Директивы условной компиляции программы . Разработчик имеет возможность, используя директивы условной компиляции выбирать, например, какую версию приложения (16- или 32-разрядную) он собирается создать. Используя подобные директивы, можно создавать программы, имеющие один и тот же исходный текст, но которые после компиляции смогут работать на различных платформах.

Object Browser (Инспектор объектов) . Данное средство предназначено для облегчения идентификации и управления всеми ОLЕ Automation Servers, накоторые есть ссылки в проекте. Выбрав нужный объект, разработчик можетлегко выбрать и передать корректный синтаксис выражения работы с объектом в текст программы или вызвать встроенную помощь для данного объекта.

Встроенный редактор . Увеличена функциональны мощь встроенного редактора. Во-первых, расширены возможности настройки, точнее постройки, “на свой вкус” формата отображаемых строк кода, комментариев, ключевых слов, идентификаторов, точек останова, и т. д. Можно задать различные фонты, цвета и размеры фонтов для облегчения чтения текста программы. Во-вторых, улучшена работа с отладочным окном. Больше нет необходимости держать и окно с отлаживаемым текстом программы и окно с отображаемыми переменными - теперь достаточно использовать одно окно, состоящее из двух подвижных частей: нижнее подокно представляет собой полнофункциональный редактор кода, верхнее же показывает содержимое переменных.

Расширение лексики языка программирования . Для объявления подпрограмм и функций, доступных или не доступных из других модулей проекта, введены дополнительные служебные слова при объявлении процедур: Public и Private соответственно. Visual Basic 4.0 “прихватил”теперь кусочек Pascal, добавив ксвоему лексическому запасу выражения “With”, ”For Each”, а также добавлены новые типы данных - Byte (простое беззнаковое, для представления чисел в диапазоне 0-255), Вооlean 16 битовые (2-байта) числа, которые могут принимать только два значения: True или False) и Collection. Collection позволяет построить собственную группу пронумерованных объектов. Использование Collection более предпочтительно, чем использование массивов вследствие большей гибкости индексов, и наличия наследуемых методов для вставляемых и удаляемых объектов коллекции.

Процедуры свойств ( property procedures ). Появилась возможность создавать для объектов (форм, стандартных модулей и модулей классов) собственные специализированные свойства (properties), и привязывать к ним выполняемый код, который будет вызываться при обращении к свойству.

Расширяемость оболочки программирования . Оболочка разработки (IDE) самого Visual Basic 4.0 также может быть управляем через ОLЕ Automation, что позволяет ОLЕ приложениям создавать и размещать в специальное меню Add-InVisual Basic 4.0 свои команды, расширяя таким образом возможности IDE.

Создание О L Е Objekt приложений и классы (С lasses ) . Одной из основных претензий к Visual Basic со стороны профессиональных программистовслужило отсутствие средств создания готовых модулей для последующего использования. Программист вынужден был обращаться к С, С++, Раsсаl или другим языкам программирования для создания DLL ивызовам функций DLL из программы на Visual Basic или, например, из приложения Microsoft Office. С выходом Visual Basic 4.0 данная ситуация коренным образом изменилась, программисты могут создать объекты ОLЕ Automation.Библиотеки подобных объектов, каждый со своими характеристиками и методами управления, могут быть использованы из любого приложения, имеющего возможность контролировать приложение, являющееся ОLЕобъектом (OLE Object Application).

По определению, такие объекты названы классами (Claases) - (эту часть языка Visual Basic взял от С++) и располагаются в специальных модулях (class module). Для совместимости с программами, реализованными в третьей версии и использующими VВХ из стандартного набора, Visual Basic 4.0 включает ОLЕ Custom Control (OCX), заменяющие эти VВХ. При вызове проекта программы, разработанной в среде предыдущей версии Visual Basic и использующей один из стандартных VBX предложит автоматически преобразовать ссылки на новые ОСХ. Такие приложения, как Microsoft Excel для Windows, Microsoft Word для Windows и другие, являющиеся ОLЕприложениями,теперь можно вставлять в Окно Инструментария (ТооlBох) как обычные элементы управления.

Таким образом можно сказать об некоторой универсальности Visual Basic для создания приложений для Windows.

2. РАЗРАБОТКА СТРУКТУРНОЙ СХЕМЫ И АЛГОРИТМОВ ПРОГРАММЫ

2.1. Функциональная схема работы Windows 95

Операционная система должна обеспечивать взаимодействие приложения как самой верхней ступени с самым нижним уровнем иерархии - аппаратной частью компьютера, черезнабор каких-либо стандартных функций и подпрограмм. Кроме того она должна обеспечивать пользователя удобным интерфейсом. Рассмотрим как это реализовано в выбранной операционной системе Windows 95. Функциональная схема работы операционной системы Windows 95 представленная на рис 2.1.

Аппаратная часть компьютера представляющая собой какие-либо устройства ввода-вывода информации (клавиатура, мышь, принтер, плоттер, сканер, устройство чтения компакт дисков, монитор и т.д.) подключена на системную шину через так называемые контроллеры устройств имеющие в адресном пространстве памяти вычислительной машины какие-то адреса называемые портами ввода-вывода. Через эти порты при низкоуровневом программировании программист может обмениваться информацией с устройством. Но сейчас такая технология считается устаревшей и приводящей к излишним затратам ресурсов. Ведь в таком случае стандартные функции обмена информацией должны находится в каждой программе которая могла обмениваться информацией с внешними устройствами.

Windows 95 обеспечивает взаимодействие с внешними устройствами как с потоками информации независимо от самого устройства через свои собственные драйвера устройств.

Итак, устройства обмена информацией подключаются к компьютеру через контроллеры, которыми управляют драйверы устройств. Драйверы устройств разработаны таким образом, что при передаче информации на устройство они организовывают очередь следуя которой на устройство передается информация от различных приложений (например принтер). Однако при передаче информации в обратном направлении (от устройства) драйверы создают так называемые события (например событие “закончена печать” от принтера или “нажата кнопка” от мыши), которые операционной системой помещаются в глобальную очередь событий, из которой события попадают в специальный блок определения назначения события. Там по информации хранящейся в системе: приоритет события, какое приложение открыло поток обмены с устройством, приоритет приложения открывшего поток обмена и пр. Определяется назначение события, его принадлежность определенной виртуальной машине организованной системой. По этому назначению передается сообщение о происходящем событии приложению которое должно его обработать.

В отдельной виртуальной машине приложения по приходе событий организовывается локальная очередь событий. Из которой сообщения о событиях передаются по так называемому фокусу объекту который в этот момент находится в фокусе. Объектом может быть любой элемент управления (как то кнопки, поля ввода, имиджи, иконки, картинки и т.д.). С объектом связана целая система процедур и функций которые могут обрабатывать события приходящие объекту, а также могут передавать их другим объектам или выше на ступень по иерархии объектов (элементы управления передавать формам, а формы в свою очередь более глобальным формам или окнам приложений или самой системе).

Таким образом, задача программиста заключается в создании подпрограмм и функции реагирующих определенным образом на события приходящие от системы, для всех объектов которые могут использовать эти события в целях определяемых программой в целом, для конкретной задачи поставленной перед программой.

2.2. Используемая терминология

Итак, Visual Basic предназначен для быстрого создания приложений в среде Windows, и как любая программа для Windows, программа, написанная на Visual Basic, должна иметь как минимум одно окно.

В терминах Visual Basic все окна есть формы, в программе может быть множество окон-форм. Формы в программе служат для отображения элементов пользовательского интерфейса. На каждой форме может находится некоторое количество элементов управления, а также графика и даже другие формы, причем, как вырожденный случай, на форме может вообще не располагаться ни одного элемента.

В том случае, когда приложение использует окно-форму для отображения различных типов информации или предоставляет возможность работать в нескольких режимах, чтобы не засорять площадь окна множество дополнительных элементов, используется линейка ниспадающих меню. Каждое меню содержит список пунктов, которые в свою очередь могут разворачиваться в подменю. Названия подобных вложенных подменю, а также пунктов меню, при выборе которых потребуется в отдельном диалоговом окне выполнить некие дополнительные действия, при отображении в списке пунктов меню дополняются справа многоточием.

Элементы управления служат для отображения информации, выбора из некоторого множества объектов, а также для более ясного и четкого восприятия.

Любая, даже простейшая программа на Visual Basic, имеет свой Проект (project),информацию о котором хранится в специальном файле. В проект программы, отображаемом в специальном окне Проекта, помещаются все формы, модули и файлы, совокупность которых и составляет программу.

Visual Basic не является объектно-ориентированным языком вдогматическом понимании ООП (объектно-ориентированное программирование), Visual Basic базируется напарадигме событийно-ориентированного программирования: программа - суть некий набор реального или виртуального мира, каждый из которых понимает некий ограниченный набор событий (возможна, расширяемый). По приходу каждого события из набора отслеживаемых событий формы и элементы управления могут реагировать определенным образом, в соответствии с программным кодом, реализованным программистом для каждого объекта.

Для внесения управляющего программного кода для событий и методов используется Редактор Кода, который служит для создания, просмотра и модификации подпрограмм (Sub) и функций (Function). Процедура представляет собой подпрограмму, котораяне возвращает результата.

Программный код, связанный с формами и элементами управления, служит для реализации ответной реакции программы на действия пользователя или приход системного события.

Программный код может находиться в специальных программных модулях (стандартные модули и модули классов) или быть “привязан” только к элементу управления (то есть объекту)или форме.

Кроме набора событий (events), для каждого элементауправления существует предопределенный (возможно,расширяемый) набор свойств или характеристик (properties), представляющих собой некие начальные установки.Данные свойства разделяются посфере доступности:есть свойства, которые могут устанавливаться только в режиме разработки, только во время выполнения программы или в обоих случаях.Установка и настройка свойств объектов осуществляется в окне Свойств (Properties).

Для элементов управления и форм также существует связанный с ними набор методов (method), которые можно рассматривать как набор команд, понимаемых данным объектом.

Для некоторых отображаемых на экране элементов управления есть возможность задавать различные основные цвета и цвета фона. Для удобства выбора нужных цветов используется Цветовая Палитра (Color Palette).

2.3. Синтез общей структурной схемы программы

Таким образом переходя к синтезу структурной схемы программы можно условно разбить на несколько логических блоков. Каждый из которых представляет собой набор привязанных к объектам подпрограмм, функций и данных (рис. 2.2).

Основным звеном программы является главная форма программы (Main_Form.frm)представляющая собой главную интерфейсную часть программы. В которой происходят все преобразования проекта. Проектом, в контексте данной программы, называется совокупность документов и функций OLE Automation находящихся в рабочей области программы в определенном взаимодействии друг с другом. Над которыми могут производится определенные действия по созданию, редактированию, удалению, запуску функций и пр. Приводящие к изменению как самого проекта в целом, так и просто документов входящих в проект.

В главной форме содержатся коды по обработке всех меню содержащихся в программе, в том числе и функций работы с системным буфером обмена информацией. Кроме того главная форма содержит программный код обрабатывающий все изменения проекта с точки зрения пользователя. В том числе создание документов, функций, их перемещение в проекте, удаление запуск функций на обработку документов и пр.

Из главной формы производится активизация всех дочерних форм программы в режиме модальных окон. То есть окон до закрытия которых работа основной программы главной формы (а иногда и всей системы в целом, как например в случае открытия окна сообщения о глобальной ошибке возможно приводящей к разрушению системы) приостанавливается.

Дочерними формами по отношению к главной форме являются, форма создания и редактирования свойств документов (MakeDocForm.frm), форма создания и редактирования свойств функций OLE Automation (MakeFunkForm.frm), форма создания и изменения регистрационных данных приложенийподдерживающих OLE Automation или для которых необходима эмуляция этой поддержки (MakeDocForm.frm).

Форма создания и редактирования свойств документов содержит все необходимые элементы управления (объекты) для ввода и изменения данных о документе, а также его визуальном представлении в проекте (то есть его иконки).Также в этой форме содержится программный код обрабатывающий эти элементы управления и вносящий изменения в глобальную структуру данных о документах в проекте. Эта форма представляет собой окно под названием “Свойства документа”.

Форма создания и изменения регистрационных данных приложений также представляет собой окно под названием “Регистратор приложений” и также содержит в себе ряд объектов (элементов управления) и программный код обрабатывающий эти элементы управления для изменения данных о зарегистрированных приложениях которые могут участвовать в проекте в качестве непосредственных обработчиках документов, а также в виде функции OLE Automation.

Форма создания и редактирования свойств функций OLE Automation представляет собой окно “Свойства функции” и содержит элементы управления позволяющие редактировать свойства функции OLE Automation. Форма также содержит программный код модифицирующий глобальные данные о функциях в проекте.

Все глобальные данные, а также подпрограммы необходимые для работы большинства блоков программы и не входящие в какую либо форму содержатся в специальном модуле (MainModule), который не содержит в себе никаких объектов и вообще визуально не определяется. Он включает в себя только программный код определяющий всю структуру данных и хранит в себе данные о регистрации приложений, свойств функций и документов. А также данные необходимые для нормальной работы программы в целом. Как то, различные переменные по средством которых производится обмен данными между различными формами и окнами внутри самой программы. А также модуль включает в себя подпрограммы и функции необходимые для всего проекта в целом. Например функции открытия проекта, сохранения проекта на носителе информации и т.д., которые не входят в какую-либо форму и могут вызываться из любой части программы.

Следующим логическим блоком программы является блок обработки ошибок. Он строго говоря не выделяется в в программном виде как отдельная часть программы, но он содержится практически в каждой программной единице будь то подпрограмма или функция. Однако как существенная часть всего программного комплекса его стоит отметить отдельным блоком.

Кроме форм и модуля в структуру программы входит основной блок программного кода обеспечивающий взаимодействие с механизмом OLE Automation операционной системы Windows 95. Как раз в этом блоке осуществляется выполнение функций OLE Automation, на него легла основная часть формирования сообщений для Windows и приложений, а также расшифровка ответных сообщений системы и программ.

2.4. Разработка структурной схемы взаимодействия программы с механизмом связывания и внедрения

Для более качественной разработки алгоритма взаимодействия программы с механизмом связывания и внедрения объектов Windows 95, необходимо рассмотреть функциональную схему работы OLE и системы OLE Automation (рис 2.3).

В общем виде структура взаимодействия операционной системы и приложений состоит из трех частей:

OLE Server - OLE сервер это приложение обеспечивающее некоторое количество функций

OLE Client (Controller) - OLE клиент (контроллер) является приложением которое пользуется функциями OLE Automation OLE клиента

Windows 95/NT является посредником между клиентами и серверами OLE обеспечивая их взаимодействие через ряд стандартных потоков и буферов обмена информацией OLE.

OLE сервер, вернее его часть отвечающая за OLE взаимодействие состоит из двух частей. Регистратора интерфейсов OLE находящихся в ядре, и собственно ядра OLE сервера, которое в свою очередь состоит из OLE интерфейсов обеспечивающих при обращении к конкретному интерфейсу ряд функций называемых методами, они то и являются на самом деле OLE Automation функциями.OLE сервер является несмотря на простоту описания наиболее сложной частью всего взаимодействия посредствам OLE, с точки зрения программиста. Эта сложность обусловлена непосредственно сложностью самих методов OLE, обеспечиваемых сервером.

Windows 95 являясь посредником во всех операциях между клиентом и сервером, выполняет координирующую роль администратора при передаче данных. А также именно Windows хранит информацию о всех интерфейсах серверов, здесь существует структурированное хранилище для этих целей. Также Windows выполняет регистрацию этих интерфейсов и отвечает на запросы IID от клиентов. Кроме того Windows содержит буфер обмена информацией между клиентом и сервером. Блок OLE Automation производит непосредственное соединение сервера и клиента и обеспечивает их взаимодействие.

Данные могут передаваться через буфер обмена Widows, а также непосредственно между методами и объектом, но этот способ считается не корректным поскольку не позволяет перемещать OLE объект.

OLE клиент (контроллер) должен, кроме естественно вызовов самих методов OLE, обеспечивать корректную обработку всех сообщений в обратном направлении (от сервера), Клиент состоит из трех взаимосвязанных частей: блок запроса IID для интерфейса объекта,блок обработки ОLE документа и самого OLE объекта. Первая часть выполняет только подготовительную функцию, она запрашивает IID интерфейс для конкретного объекта у Windows 95, получает этот интерфейс и передает его дальше во второй блок. Во втором блоке проиходит сама обработка документа OLE объекта. Именно в этом блоке обрабатываются такие события как активация извне и активация изнутри. Применяя при этом соответствующие методы обработки этих событий по полученным от первого блока интерфейсы. По этим интерфейсам блок производит активизацию методов применяя либо уже заранее известную информацию о параметрах методов и ответной реакции методов на их активацию, либо полученную через интерфейс эту же информацию. Таким образом воздействуя на объект и являясь посредником при передаче информации между методами сервера и объектом.

OLE объект это сам документ помещаемый в приложение клиента. Представляет собой самый зависимый элемент во всей структуре взаимодействия. Он сам ни на что не влияет, однако на него влияют методы сервера вызываемые клиентом. И на самом деле включает в себя только данные и их структуру.

Таким же образом как и структура OLE клиента, должна выглядеть структурная схема той части контроллера автоматически связываемых объектов, которая отвечающая за взаимодействие с механизмом связывания и внедрения Windows 95.

Поскольку, по сути, контроллер должен являться клиентом практически для всех приложений присутствующих в системе, то информация о OLE интерфейсах отдельных приложений заранее не известна. По этому эта информация должна быть собрана перед внедрением конкретных объектов, то есть в процессе работы программы. Это вносит свои коррективы в конкретную структурную схему взаимодействия программы с OLE - добавляется блок сбора и интерпретации информации о интерфейсах приложений (рис 2.4).

Кроме того схема должна включать в себя блок эмуляции OLE для приложений не предназначенных изначально для OLE взаимодействия.

Таким образом произведен синтез структурной схемы взаимодействия с механизмом связывания и внедрения (OLE).

Разработка структуры данных

Приступая к разработке структуры данных необходиморазделять данные по критерию возможности доступа до них. Так данные применяемые только в форме должны находится в самой форме, а данные доступ до которых происходит из нескольких форм называются глобальными и обычно помещаются в модуль с применением префикса Public (для возможности доступа до них из вне).

В этом разделе будет описана структура данных из главного модуля программы в котором хранятся глобальные данные необходимые для всего проекта.

Модуль состоит из четырех частей (рис. 2..5), три из которых представляют собой структуры для представления в машинном виде данных о регистрированных приложениях, о документах находящихся в проекте и о функциях применяемых в проекте для работы с документами.В четвертой части находятся данные необходимые для взаимодействия между формами, и нормальной работы контроллера в целом.

Данные о регистрированных приложения состоят из следующих частей:

· глобальный номер регистрации - представляет собой сквозную нумерацию всех когда либо зарегистрированных приложений не зависящею от количества установленных и удаленных приложений на данный конкретный момент времени;

· описание - текст описывающий работу приложения, составляется пользователем;

· имя файла - указатель на запускаемый файл приложения для работы с ним блока OLE Automation;

· имя приложения - собственное расширенное имя приложения указываемое для удобства работы с программой;

· маска файлов - одно или несколько расширений имен файлов документов с которыми может работать зарегистрированное приложение.

Данные о документах находящихся в проекте хранятся в следующей структуре:

· глобальный номер документа - представляет собой сквозную нумерацию всех когда либо созданных документов не зависящею от количества созданных и удаленных документов на данный конкретный момент времени;

· описание - текст описывающий документ, составляется пользователем;

· имя файла - путь и имя файла документа;

· время создания документа;

· имя приложения - имя приложения которое обрабатывает этот документ (выбирается из зарегистрированных в программе приложений или стандартный обработчик Windows документа с таким расширением) ;

· иконка - путь и имя иконки для визуального представления документа в окне проекта;

· подпись - текст под иконкой документа в окне проекта;

· координаты документа в окне проекта;

· указатели на исходящие из документа функции OLE в проекте.

Наиболее объемными являются данные о функциях OLE содержащихся в проекте, состоящие из следующих переменных:

· глобальный номер функции - представляет собой сквозную нумерацию всех когда либо созданных функций не зависящею от количества созданных и удаленных функций на данный конкретный момент времени;

· описание - текст описывающий функцию, составляется пользователем;

· имя файла - путь и имя файла функции;

· время создания функции;

· функция автомата - вызываемый метод;

· имя приложения - имя приложения которое эту функцию (выбирается из зарегистрированных в программе функций);

· иконка - путь и имя иконки для визуального представления функции в окне проекта;

· подпись - текст под иконкой функции в окне проекта;

· координаты функции в окне проекта;

· флаг автоматического выполнения функции в случае изменения любого входящего в из функцию документа;

· флаг запроса пользователя перед выполнением функции;

· указатели на исходящие функции OLE в проекте;

· указатели на входящие функции OLE в проекте;

· указатели на исходящие из функции документы;

· указатели на входящие в функцию документы;

· линковщик документов и функции - строка связывающая документы и функцию в одну строку используемую программой в качестве вызова функции с параметрами.

Четвертая общая часть состоящая из различных переменных необходимых для работы всей программы состоит из следующего:

· различные флаги устанавливаемые и снимаемые различными функциями и подпрограммами для разделения ресурсов выделенных программе;

· глобальные переменные определяющие количество документов, функций OLE и зарегистрированных приложений на данный момент времени;

· переменные обмена информации (определяющие состояние буфера обмена и структуру данных находящихся в буфере обмена).

Таким образом определены все данные необходимые для работы всей программы в целом. Кроме того в каждой отдельной форме существует область объявления переменных, в которой определяются переменные для работы конкретно этой формы.

Существуют также и области объявлений переменных в каждой отдельной функции и подпрограмме для работы этой функции. Такое разделение областей видимости позволяет более гибко управлять данными в программе.

Инструкция пользователя по работе с программой

Перед запуском программы контроллера программу необходимо инсталлировать ее на жесткий диск. Это может выполнить как специальная программа инсталляции, так и сам пользователь. Нужно установить саму программу в специальную директорию, а специальные DLL-файлы добавить в директорию с системой Windows. Процесс это сложный для начинающего пользователя. По этому рекомендуется доверить его программе инсталляции.

После установки программы на диск ее можно запускать, для этого нужна лишь дважды щелкнуть на иконке программы или в главном меню Windows (“Пуск”) выбрать пункт “Выполнить” и изменить путь до исполняемого файла до запускаемого файла контроллера - Controller.exe и нажать кнопку “ОК”. После чего программа запустится и на экране появится главная форма программы (окно).

Интерфейс программы позволяет, зная общие принципы построения интерфейса в системе Windows 95, без особого труда научится пользоваться программой. Кроме того контекстная помощь и использование стандартных клавишных комбинаций для стандартных операций применяемых в системе намного облегчают пользование программой.

Основное окно программы состоит из рабочей области и меню, а также меню появляющееся при нажатии правой кнопки мыши (рис. 3.1).

Все управление программой обычно осуществляется графическим манипулятором (мышью) и набором горячих клавиш на клавиатуры, возможно управление только клавиатурой.

Система ниспадающих меню позволяет оперативно управлять процессом проектирования. Меню “Файл” состоит из пунктов открытия проекта, сохранения проекта, открытие нового проекта, выхода из программы. Меню “Правка” позволяет посредствам буфера обмена информацией обмениваться информацией между проектами, а также изменять текущий проект, копировать объекты в буфер обмена и из него, удалять часть объектов (рис 3.2).

Меню “Создать” кроме непосредственно прямого выбора в линейке меню, через меню “Правка”, можно получить нажав правую кнопку мыши, из него можно выбрать объект(документилифункцию OLE,илизарегистрироватьприложение OLE Automation)которыйнеобходимосоздать. После выбора объекта запускается редактор свойств выбранного объекта (рис.3.3). Как видно из иллюстрации, в этих формах все свойства описаны непосредственно в форме.

Все свойства документов и функций после заполнения сохраняются в переменных главного модуля. Назначение переменных главного модуля, а значит и назначение свойств объектов были описаны в предыдущем разделе

Заполнив эти формы создается заданный объект который можно перемещать указателем мыши. Правой кнопкой мыши можно через возникшее меню всегда изменить свойства объекта (выбрав “Свойства”).

Кроме того используется следующие способы управления объектами созданными в процессе проектирования. Возможно объединение объектов в группу, для этого нужно нажав левую кнопку мыши не отпуская обвести те объекты которые объединяются в группу, при отпускании кнопки объекты выделятся в рамку. С этими выделенными объектами возможно теперь выполнять групповые операции (перемещения, удаления копирования и т.д.) через меню “Правка” или по правой кнопки мыши.

Над документами также выполняются собственно операции их изменения, то есть в случае применения программы в конструкторском проектировании, их изменение возможно либо непосредственно приложением которое обрабатывает этот документ, либо через уже созданные OLE функции которые в неявном виде вызывают приложения и обрабатывают документы. Так запустить функцию OLE можно двойным щелчком левой кнопки мыши на нужной функции. А для запуска приложения обрабатывающего определенный документ нужно дважды щелкнуть мышкой на документе.

После работы с конкретным документом вырабатывается событие “Документ был изменен” которое должны обрабатывать все исходящие из документа функции OLE (если конечно у них был установлен флаг свойства “Автоматическое выполнение функции при изменении входного документа”). Что влечет за собой выполнение этих функций, то есть изменение документов исходящих из функции, что в свою очередь может повлечь за собой выполнение других функций. Процесс может стать циклическим (если входные документы будут изменены исходящими функциями). Чтобы этого не произошло необходимо пользоваться флагом “Запрос пользователя перед выполнением” в свойствах функции OLE. Установка этого флага повлечет собой запрос пользователю о необходимости выполнения этой функции перед ее выполнением. Тем самым предоставляется возможность пользователю зациклить процесс обратной связью, что иногда необходимо (например, для подбора нужного теплового режима), а затем прервать его.

Перед выходом из программы контроллера, программой будет задан вопрос о необходимости сохранения измененного проекта. Если проект нужен будет в последующем, его нужно сохранить.

Если необходимость в программе контроллера отпала, то ее можно удалить с диска. Однако программа контроллера не снабжена специальным файлом унинсталляции, как это требует стандарт программ для Windows 95, поскольку для создания этого файла программисту необходимо досконально знать всю систему Windows, что сейчас при недостатке информации о Windows (т.к. эта система является относительно новой) в наших условиях невозможно. По этому для удаления программы с носителя кроме удаления самой директории программы контроллера необходимо удалить все DLL-файлы из директория Windows самостоятельно. Список всех файлов программы приведен в приложении.

КОНСТРУКТОРСКИЕ РАСЧЕТЫ

Показатели надежности

Основными конструкторскими расчетами для ЭВА, являются расчет надежности устройства и расчет прочности печатной платы. Рассмотрим теоретическое основание этих конструкторских расчетов.

Все промышленные изделия характеризуются качеством, то есть совокупностью свойств, которые отличают данное изделие от других и определяют степень его пригодности для эксплуатации по своему назначению. Для ЭВА это прежде всего совокупность конструкторских, технологических и эксплутационных характеристик. В процессе эксплуатации происходят изменения этих характеристик в следствии износа и необратимых процессов старения. Таким образом меняется качество изделию во времени, а характеристикой изменения качества во времени является показатель называемый надежностью.

Под надежностью понимают свойство изделия выполнять заданные функции, сохранять свои эксплутационные показатели в заданных пределах в течении требуемого промежутка времени или требуемой наработки при соблюдении режимов эксплуатации, правил обслуживания, хранения и т.д.

Надежность не может быть измерена непосредственно как любая физическая величина. Она может быть только количественно оценена или предсказана. Для оценки основных показателей надежности используют математический аппарат теории вероятности

Показатели надежности неремонтируемых систем. Неремонтируемые системы работают до первого отказа после чего заменяются новыми. Все количественные показатели надежности неремонтируемых систем являются общими и выражаются одними и теми же математическими зависимостями, но их конкретные числовые значения зависят от режимов работы изучаемых систем.

Показатели надежности неремонтируемых систем базируются на понятиях функций надежности Р(t)и функции отказа Q(t), связанных зависимостью P(t) = 1- Q(t). Обе они зависятот времени t.

Вероятностью безотказной работы P(t) называют вероятность того, что в заданном интервале времени или пределах заданной наработки ti отказов в системе не возникает, т.е. P(ti ) = P(T>ti ), где Т - случайная величина характеризующая время наработки системы до возникновения в ней отказа. Соответственно вероятностью возникновения отказа в системе Q(ti ) называетсявероятность того, что в период наработки ti в ней обязательно произойдет отказ, т.е. Q(ti ) = P(T< ti ).

Теоретическое значение вероятности безотказной работы ЭВА удобно определить следующим образом :

(4.1),

где

N1i - число изделий, отказавших во время испытаний на i-том интервале времени;

m = t / t - число интервалов

t - время испытания

t - продолжительность интервала времени

По аналогии с (4.1) статистическая вероятность безотказной работы ЭВА

(4.2),

Естественно, чем больше N, тем более точно соблюдается равенства, и тем точнее становятся значения величин P(ti ) и P’(ti ).

Вероятность безотказной работы может быть определена и для произвольного интервала времени (t1 ; t2 ), т.е. не с момента включения системы. В этом случае говорят об условной вероятности безотказной работы системы P(t1 ; t2 )в период (t1 ; t2 ), имея в ввиду, что в момент времени t1 система находится в работоспособном состоянии. Условная вероятность P(t1 ; t2 )определяется соотношением

P(t1 ; t2 ) =P(t2 ) / P(t1 ) (4.3)

где

P(t1 ) и P(t2 ) - соответственно значения функций надежности в начале и конце наработки.

Плотностью распределения наработки до отказа f(t) называют производную по времени от функции отказа Q(t):

(4.4)

Из (4.4) следует, что величина f(t)dt характеризует безусловную вероятность того, что система обязательно откажет в интервале времени (t ; t+dt)при условии что вмомент времени t она находилась в работоспособном состоянии.

Наиболее распространенным показателем надежности является интенсивность отказов. Интенсивность отказов (t) представляет собой условную вероятность возникновения отказа в системе в некоторый момент времени наработки при условии, что до этого момента отказов в системе не было. Величина интенсивности определяется отношением: (t) = f(t)/ P(t). Приблизительно ее можно оценить следующим отношением :

,

где

N1 - число изделий, отказавших при испытаниях в течении времени t

N - число изделий, работоспособных к началу испытаний.

Условная работоспособность системы в момент начала наработки можно записать в виде P(0) = 1. Тогда из (4.3) и (4.4) следует что

Аналогично может быть определена условная вероятность

Таким образом мы рассмотрели три показателя надежности. Очевидно, что достаточно знать одну (любую) из них, чтобы определить два других. Таким образом все три показателя являются равноправными. Однако в большинстве случаев предпочтение отдают интенсивности отказов.

В качестве показателя надежности используют среднюю наработку до отказа tcp . Средняя наработка до отказа представляет собой математическое ожидание M(t) случайной величины t

Вид функций f(t) и P(t) определяется конкретными законами распределения случайной величины t. Средняя наработка до отказа - это ожидаемое время исправной работы системы до первого отказа. Приближенно ее можно оценить так:

,

где

tcp i = (ti - ti-1 ) / 2

(ti ; ti-1 ) - время в начале и конце i-того интервала.

Таким образом мы рассмотрели основные показатели надежности систем./ 4 /

4.2. Методика расчета надежности

На практике чаще всего используется эскизный (ориентировочный) полный расчет надежности электронной аппаратуры. Расчет надежности нерезервируемой системы состоит в нахождении общей интенсивности отказов, наработки на отказ Тср и вероятности безотказной работы P(t). Эскизный расчет надежности нерезервированной системы можно проводить в следующем порядке :

· все элементы системы разбиваются по группам с одинаковыми или близкими интенсивностями отказов и подсчитывается число элементов N в каждой i-той группе;

· по таблицам приведенным в /4/ определяют значения интенсивности отказов для элементов i-той группы;

· рассчитывают интенсивность отказов системы как сумму произведений Ni , c учетом поправочного коэффициента

,

где

m - общее количество групп

k - поправочный коэффициент, учитывающий изменение средней интенсивности отказов элементов аппаратуры в зависимости от ее назначения (величина обычно табличная);

· определяют наработку на отказ

;

· рассчитывают зависимость вероятности безотказной работы системы от времени по формуле

;

Таким образом производится расчет надежности.

4.3. Методика определения механической прочности ПП

На ПП, как правило, устанавливается несколько десятков интегральных схем (ИС) и электроэлементов (ЭРЭ)

Пусть на плату воздействует нагрузка Q, ускорение а , необходимо проверить, не приведут ли эти воздействия к возникновению недопустимых напряжений на плате

Величина предельно допустимого напряжения G задана. При воздействии на плату нагрузки с ускорением, на нее будет действовать деформация изгиба и кручения. Для расчета возникающих напряжений плату принято представлять в виде балочной системы, лежащей на опорах.

Для нахождения действующих на плату сил можно предложить следующий алгоритм.

Определяем координаты Хi ,Yi , i-х элементов на плате - расстояние от осей до центра тяжести элементов (мм)

Определяем равнодействующую приложенных к плате сил

где

Рi - сила тяжести i-того элемента, Н;

к - количество элементов, шт.

Находим общий центр тяжести приложенных сил

и (4.5)

где

Xi и Yi - координаты центра тяжести платы, мм.

Определим силу. Действующую на плату:

, (4.6)

где

а - ускорение, воздействующее на плату

Рассчитываем реакции в опорах :

(4.7) (4.8)

где

l - расстояние между опорами

Вычисляем максимальный изгибающий момент:

Mmax = RA XC (4.9)

Определяем крутящий момент крутящий момент :

Mk = Q d, (4.10)

где

d - величина смещения центра тяжести от оси симметрии платы

(4.11)

где

b - ширина платы

Находим напряжение, вызываемое в плате крутящим моментом :

(4.12),

где

h - толщина платы

- коэффициент прочности, равный 0.333.

Проверяем выполнение равенства

(4.13)

где

- максимально допустимое напряжение в плате

Если неравенство (4.13) выполняется, то следует заключить, что приложенные нагрузки не приведут к повреждению платы. В случае, если неравенство (4.13) не выполняется, нужно предусмотреть меры, необходимые для дополнительного крепления платы.

4.3. Методика расчета собственных колебаний блока

Расчет частоты собственных колебаний блока можно привести, заменив конструкцию его эквивалентной расчетной схемой в виде блочной схемы /5/.

Частоту собственных колебаний прямоугольной пластины для всех случаев закрепления ее краев можно определить следующим образом :

, (4.14)

где

а - длина пластины, м;

D - цилиндрическая жесткость пластины

, (4.15)

Е - модуль упругости;

- коэффициент Пуассона;

q - ускорение свободного падения;

- плотность материала

- коэффициент, значение которого зависит от способа закрепления сторон пластины

Для удобства пользования выражение (4.14) приведем к виду :

, (4.16)

где

В - частотная постоянная, зависящая от способа закрепления пластины

Если пластина не стальная, а выполнена из какого-либо другого материала, то в (4.16) вводится поправочный коэффициент kM на материал

где

Е и - модуль упругости и плотность применяемого материала;

ЕС и С - модуль упругости и плотность стали.

Для учета нагрузки при распределенной нагрузке вводят поправочный коэффициент массы элементов

,

где

QЭ и QЭ - масса пластины и масса элементов, равномерно распределенных по пластине ;

Таким образом выражение (4.14) для определения частоты собственных колебаний приобретает вид

(4.17)

Важно, чтобы резонансная частота ПП отличалась от частоты вынужденных колебаний на входе, по крайней мере в два раза. При этом исключается вхождение в резонанс, опасный в вибросистеме.

Печатная плата должна обладать значительной усталостной долговечностью при воздействии вибраций, для этого необходимо, чтобы минимальная частота собственных колебаний платы удовлетворяла условию:

, (4.18)

где

jmax - вибрационные перегрузки

b - размер короткой стороны платы

- безразмерная постоянная, числовое значение которой зависит от значений частоты собственных колебаний и воздействующих ускорений.

4 .5. Расчетная часть

В расчетной части проекта в качестве примера конструкторского расчета какой-либо конструкторской единицы представим конструкторский расчет платы усилителя импульсов (УИ).

Текст программы

‘*****************************

‘ Main Module Code

‘*****************************

Option Explicit

Option Base 0

Public MenuFrom As Integer

Public Canceled As Boolean

Public SelectOn As Boolean

Public SelectIs As Boolean

Public ImageCo As Integer

Public MouseX As Integer

Public MouseY As Integer

Public TotalDocCo As Integer

Public TotalFunCo As Integer

Public TotalRegCo As Integer

Public CurDocument As Integer

Public CurFunction As Integer

Public DocumentIsChanged As Boolean

Public Type RegistrationType

TotalNumber As Long

Discription As String

FileName As String

NameApp As String

FileMask As String

End Type

Public Registrations() As RegistrationType

Public RegistrationCo As Integer

Public Type DocumentType

TotalNumber As Long

FileName As String

CreateDateTime As String

UsedProgramm As Long

Discription As String

ImageIcon As String

ImageText As String

X As Integer

Y As Integer

OutputFunPoints() As Integer

OutputFunPointCo As Integer

OutputDocPoints() As Integer

OutputDocPointCo As Integer

End Type

Public Documents() As DocumentType

Public DocumentCo As Integer

Public Type FunctionType

TotalNumber As Long

FileName As String

CreateDateTime As String

Path As String

UsedProgramm As String

AutomatFunction As String

AutoExeFlag As Boolean

AskBeforeExe As Boolean

Discription As String

ImageIcon As String

ImageText As String

X As Integer

Y As Integer

DocumentsAndFunctionsLink As String

InputDocPoints() As Integer

InputDocPointCo As Integer

OutputDocPoints() As Integer

OutputDocPointCo As Integer

InputFunPoints() As Integer

InputFunPointCo As Integer

OutputFunPoints() As Integer

OutputFunPointCo As Integer

End Type

Public Functions() As FunctionType

Public FunctionCo As Integer

Public Sub ShowDocumentProperty(DocNumber As Integer)

On Error GoTo Err1

MakeDocForm.Label4(0).Caption = FileLen(Documents(DocNumber).FileName)

MakeDocForm.Label4(1).Caption = FileDateTime(Documents(DocNumber).FileName)

MakeDocForm.Label4(2).Caption = Documents(DocNumber).CreateDateTime

MakeDocForm.IconText.Text = Documents(DocNumber).ImageText

MakeDocForm.IconImage.Picture = LoadPicture(Documents(DocNumber).ImageIcon)

MakeDocForm.ImageIconText.Caption = Documents(DocNumber).ImageIcon

MakeDocForm.Discrip.Text = Documents(DocNumber).Discription

MakeDocForm.DocumentName = Documents(DocNumber).FileName

If Documents(DocNumber).UsedProgramm = -1 Then

MakeDocForm.Combo1.ListIndex = RegistrationCo + 1

Else

MakeDocForm.Combo1.ListIndex = GetREGIndex(Documents(DocNumber).UsedProgramm)

End If

Exit Sub

Err1:

Select Case MsgBox("Ïðîèçîøëà îøèáêà ïðè ïîïûòêå ñ÷èòàòü ôàéë.", vbAbortRetryIgnore + vbCritical)

Case vbAbort

End

Case vbRetry

Resume 0

Case vbIgnore

End Select

End Sub

Public Sub SaveRegCards()

Dim FileNumber As Integer

Dim a As Integer

On Error GoTo Err1

FileNumber = FreeFile

Open App.Path & "\RegisterCards" For Output As FileNumber

Write #FileNumber, TotalRegCo, RegistrationCo

For a = 0 To RegistrationCo

With Registrations(a)

Write #FileNumber, .TotalNumber, .Discription, .FileName, .NameApp, .FileMask

End With

Next a

Close FileNumber

Exit Sub

Err1:

Select Case MsgBox("Ïðîèçîøëà îøèáêà ïðè ïîïûòêå çàïèñàòü ôàéë ðåãèñòðàöèè." _

& Chr(13) & Chr(10) & Err.Number & Chr(13) & Chr(10) & _

Err.Description, vbAbortRetryIgnore + vbCritical)

Case vbAbort

End

Case vbRetry

Resume 0

End Select

End Sub

Public Sub MemberDocumentProperty(DocNumber As Integer)

Documents(DocNumber).ImageText = MakeDocForm.IconText.Text

Documents(DocNumber).ImageIcon = MakeDocForm.ImageIconText.Caption

Documents(DocNumber).Discription = MakeDocForm.Discrip.Text

Documents(DocNumber).FileName = MakeDocForm.DocumentName.Text

Documents(DocNumber).CreateDateTime = MakeDocForm.Label4(0).Caption

If MakeDocForm.Combo1.ListIndex = RegistrationCo + 1 Then

Documents(DocNumber).UsedProgramm = -1

Else

Documents(DocNumber).UsedProgramm = Registrations(MakeDocForm.Combo1.ListIndex).TotalNumber

End If

End Sub

Public Sub SaveProject(ProjectName As String)

Dim FileNumber As Integer

Dim a As Integer

Dim b As Integer

On Error GoTo Err1

FileNumber = FreeFile

Open ProjectName For Output As FileNumber

Write #FileNumber, TotalDocCo, TotalFunCo, DocumentCo, FunctionCo

For a = 0 To DocumentCo

With Documents(a)

Write #FileNumber, .TotalNumber, .FileName, .CreateDateTime, .UsedProgramm, _

.Discription, .ImageIcon, .ImageText, .X, .Y, .OutputFunPointCo, _

.OutputDocPointCo

For b = 0 To .OutputFunPointCo

Write #FileNumber, .OutputFunPoints(b)

Next b

For b = 0 To .OutputDocPointCo

Write #FileNumber, .OutputDocPoints(b)

Next b

End With

Next a

For a = 0 To FunctionCo

With Functions(a)

Write #FileNumber, .TotalNumber, .FileName, .CreateDateTime, .UsedProgramm, _

.AutomatFunction, .AutoExeFlag, .AskBeforeExe, .Discription, _

.ImageIcon, .ImageText, .X, .Y, .DocumentsAndFunctionsLink, _

.OutputFunPointCo, .OutputDocPointCo, .InputFunPointCo, _

.InputDocPointCo

For b = 0 To .OutputFunPointCo

Write #FileNumber, .OutputFunPoints(b)

Next b

For b = 0 To .OutputDocPointCo

Write #FileNumber, .OutputDocPoints(b)

Next b

For b = 0 To .InputFunPointCo

Write #FileNumber, .InputFunPoints(b)

Next b

For b = 0 To .InputDocPointCo

Write #FileNumber, .InputDocPoints(b)

Next b

End With

Next a

Close FileNumber

Exit Sub

Err1:

Select Case MsgBox("Ïðîèçîøëà îøèáêà ïðè ïîïûòêå çàïèñàòü ôàéë ïðîåêòà." _

& Chr(13) & Chr(10) & Err.Number & Chr(13) & Chr(10) & _

Err.Description, vbAbortRetryIgnore + vbCritical)

Case vbAbort

End

Case vbRetry

Resume 0

End Select

End Sub

Public Sub LoadRegCards()

On Error GoTo Err1

Dim FileNumber As Integer

Dim a As Integer

FileNumber = FreeFile

Open App.Path & "\RegisterCards" For Input As FileNumber

Input #FileNumber, TotalRegCo, RegistrationCo

If RegistrationCo = -1 Then

Close FileNumber

Exit Sub

End If

ReDim Registrations(RegistrationCo)

For a = 0 To RegistrationCo

With Registrations(a)

Input #FileNumber, .TotalNumber, .Discription, .FileName, .NameApp, .FileMask

End With

Next a

Close FileNumber

Exit Sub

Err1:

Select Case MsgBox("Ïðîèçîøëà îøèáêà ïðè ïîïûòêå ñ÷èòàòü ôàéë ðåãèñòðàöèè." _

& Chr(13) & Chr(10) & Err.Number & Chr(13) & Chr(10) & _

Err.Description, vbAbortRetryIgnore + vbCritical)

Case vbAbort

End

Case vbRetry

Resume 0

Case vbIgnore

RegistrationCo = -1

End Select

End Sub

Public Sub LoadProject(ProjectName As String)

On Error GoTo Err1

Dim FileNumber As Integer

Dim a As Integer

Dim b As Integer

FileNumber = FreeFile

Open ProjectName For Input As FileNumber

Input #FileNumber, TotalDocCo, TotalFunCo, DocumentCo, FunctionCo

If DocumentCo <> -1 Then

ReDim Documents(DocumentCo)

For a = 0 To DocumentCo

With Documents(a)

Input #FileNumber, .TotalNumber, .FileName, .CreateDateTime, .UsedProgramm, _

.Discription, .ImageIcon, .ImageText, .X, .Y, .OutputFunPointCo, _

.OutputDocPointCo

If .OutputFunPointCo <> -1 Then

ReDim .OutputFunPoints(.OutputFunPointCo)

For b = 0 To .OutputFunPointCo

Input #FileNumber, .OutputFunPoints(b)

Next b

End If

If .OutputFunPointCo <> -1 Then

ReDim .OutputDocPoints(.OutputDocPointCo)

For b = 0 To .OutputDocPointCo

Input #FileNumber, .OutputDocPoints(b)

Next b

End If

End With

Next a

End If

If FunctionCo <> -1 Then

ReDim Functions(FunctionCo)

For a = 0 To FunctionCo

With Functions(a)

Input #FileNumber, .TotalNumber, .FileName, .CreateDateTime, .UsedProgramm, _

.AutomatFunction, .AutoExeFlag, .AskBeforeExe, .Discription, _

.ImageIcon, .ImageText, .X, .Y, .DocumentsAndFunctionsLink, _

.OutputFunPointCo, .OutputDocPointCo, .InputFunPointCo, _

.InputDocPointCo

If .OutputFunPointCo <> -1 Then

ReDim .OutputFunPoints(.OutputFunPointCo)

For b = 0 To .OutputFunPointCo

Input #FileNumber, .OutputFunPoints(b)

Next b

End If

If .OutputDocPointCo <> -1 Then

ReDim .OutputDocPoints(.OutputDocPointCo)

For b = 0 To .OutputDocPointCo

Input #FileNumber, .OutputDocPoints(b)

Next b

End If

If .InputFunPointCo <> -1 Then

ReDim .InputFunPoints(.InputFunPointCo)

For b = 0 To .InputFunPointCo

Input #FileNumber, .InputFunPoints(b)

Next b

End If

If .InputDocPointCo <> -1 Then

ReDim .InputDocPoints(.InputDocPointCo)

For b = 0 To .InputDocPointCo

Input #FileNumber, .InputDocPoints(b)

Next b

End If

End With

Next a

End If

Close FileNumber

Exit Sub

Err1:

Select Case MsgBox("Ïðîèçîøëà îøèáêà ïðè ïîïûòêå ñ÷èòàòü ôàéë ïðîåêòà." _

& Chr(13) & Chr(10) & Err.Number & Chr(13) & Chr(10) _

& Err.Description, vbAbortRetryIgnore + vbCritical)

Case vbAbort

End

Case vbRetry

Resume 0

Case vbIgnore

FunctionCo = -1

DocumentCo = -1

End Select

End Sub

Public Function GetREGIndex(TotalNumber As Long) As Integer

Dim a As Integer

For a = 0 To RegistrationCo

If Registrations(a).TotalNumber = TotalNumber Then

GetREGIndex = a

Exit For

End If

Next a

End Function

Public Function GetDOCIndex(TotalNumber As Long) As Integer

Dim a As Integer

For a = 0 To DocumentCo

If Documents(a).TotalNumber = TotalNumber Then

GetDOCIndex = a

Exit For

End If

Next a

End Function

Public Function GetFUNIndex(TotalNumber As Long) As Integer

Dim a As Integer

For a = 0 To FunctionCo

If Functions(a).TotalNumber = TotalNumber Then

GetFUNIndex = a

Exit For

End If

Next a

End Function

Public Sub ShowProject()

Dim a As Integer

With MainForm

For a = 0 To DocumentCo

ImageCo = ImageCo + 1

Load .ImageIcon(ImageCo)

.ImageIcon(ImageCo).Top = Documents(a).Y

.ImageIcon(ImageCo).Left = Documents(a).X

.ImageIcon(ImageCo).Visible = True

.ImageIcon(ImageCo).Enabled = True

.ImageIcon(ImageCo).Picture = LoadPicture(Documents(a).ImageIcon)

.ImageIcon(ImageCo).Tag = Documents(a).TotalNumber

Load .ImageText(ImageCo)

.ImageText(ImageCo).Top = Documents(a).Y + 500

.ImageText(ImageCo).Left = Documents(a).X

.ImageText(ImageCo).Visible = True

.ImageText(ImageCo).Enabled = True

.ImageText(ImageCo).Caption = Documents(a).ImageText

.ImageText(ImageCo).Tag = 1

Next a

End With

End Sub

‘******************************

‘Main Form Code

‘******************************

Option Explicit

Option Base 0

Private Sub Form_DragDrop(Source As Control, X As Single, Y As Single)

Dim a As Integer

Dim dX As Integer

Dim dY As Integer

If SelectIs = True Then

dX = X - Source.Left

dY = Y - Source.Top

For a = 0 To ImageCo

If ImageIcon(a).BorderStyle = 1 Then

If ImageText(a).Tag = 1 Then

Documents(GetDOCIndex(ImageIcon(a).Tag)).X = ImageIcon(a).Left + dX

Documents(GetDOCIndex(ImageIcon(a).Tag)).Y = ImageIcon(a).Top + dY

End If

ImageIcon(a).Left = ImageIcon(a).Left + dX

ImageIcon(a).Top = ImageIcon(a).Top + dY

ImageText(a).Left = ImageIcon(a).Left

ImageText(a).Top = ImageIcon(a).Top + 500

End If

Next a

Else

If ImageText(Source.Index).Tag = 1 Then

Documents(GetDOCIndex(Source.Tag)).X = X

Documents(GetDOCIndex(Source.Tag)).Y = Y

End If

Source.Left = X

Source.Top = Y

ImageText(Source.Index).Left = X

ImageText(Source.Index).Top = Y + 500

End If

End Sub

Private Sub Form_Load()

Dim a As Integer

LoadRegCards

MakeDocForm.Combo1.Clear

For a = 0 To RegistrationCo

MakeDocForm.Combo1.AddItem Registrations(a).NameApp, a

Next a

MakeDocForm.Combo1.AddItem "Использовать стандартный обработчик", RegistrationCo + 1

MakeDocForm.Combo1.ListIndex = RegistrationCo + 1

LoadRegCards

ImageCo = -1

LoadProject App.Path & "\pro1.prj"

ShowProject

SaveProject App.Path & "\pro1.prj"

End Sub

Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)

If Button = 1 Then

MouseX = X

MouseY = Y

SelectOn = True

With selectrec

.Visible = True

.Height = 0

.Width = 0

.Left = X

.Top = Y

End With

End If

End Sub

Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)

If SelectOn = True Then

With selectrec

If Y < MouseY Then

.Top = Y

.Height = MouseY - Y

Else

.Top = MouseY

.Height = Y - MouseY

End If

If X < MouseX Then

.Left = X

.Width = MouseX - X

Else

.Left = MouseX

.Width = X - MouseX

End If

End With

End If

End Sub

Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)

Dim a As Integer

If SelectOn = False Then

MouseX = X

MouseY = Y

If Button = 2 Then

MenuMake.Visible = True

MenuRegistration.Visible = True

MenuPropertyes.Visible = False

MenuSeparator.Visible = False

If SelectIs = True Then

MenuDelete.Visible = True

MenuCut.Visible = True

MenuCopy.Visible = True

Else

MenuDelete.Visible = False

MenuCut.Visible = False

MenuCopy.Visible = False

End If

' MenuPaste.Visible = False

MenuFrom = -1

MainForm.PopupMenu RightButtonMenuOnForm

End If

Else

SelectOn = False

selectrec.Visible = False

SelectIs = False

For a = 0 To ImageCo

If (ImageIcon(a).Top > selectrec.Top) And _

(ImageIcon(a).Left > selectrec.Left) And _

(ImageIcon(a).Top < (selectrec.Top + selectrec.Height)) And _

(ImageIcon(a).Left < (selectrec.Left + selectrec.Width)) Then

SelectIs = True

ImageIcon(a).BorderStyle = 1

Else

ImageIcon(a).BorderStyle = 0

End If

Next a

End If

End Sub

Private Sub Form_Unload(Cancel As Integer)

SaveProject App.Path & "\pro1.prj"

End

End Sub

Private Sub ImageIcon_MouseMove(Index As Integer, Button As Integer, Shift As Integer, X As Single, Y As Single)

If Button = 1 Then

ImageIcon(Index).Drag

End If

End Sub

Private Sub ImageIcon_MouseUp(Index As Integer, Button As Integer, Shift As Integer, X As Single, Y As Single)

If Button = 2 Then

MenuMake.Visible = False

MenuRegistration.Visible = False

MenuPaste.Visible = False

MenuPropertyes.Visible = True

MenuSeparator.Visible = True

MenuFrom = Index

PopupMenu RightButtonMenuOnForm

End If

End Sub

Private Sub Menu_Edit_Click()

MainForm.PopupMenu RightButtonMenuOnForm

End Sub

Private Sub MenuDelete_Click()

Dim a As Integer

If SelectIs = True Then

For a = 0 To ImageCo

If ImageIcon(a).BorderStyle = 1 Then

Delete a

End If

Next a

SelectIs = False

Else

Delete MenuFrom

End If

End Sub

Private Sub MenuMakeDocument_Click()

DocumentCo = DocumentCo + 1

TotalDocCo = TotalDocCo + 1

ReDim Preserve Documents(DocumentCo)

Documents(DocumentCo).X = MouseX

Documents(DocumentCo).Y = MouseY

CurDocument = DocumentCo

DocumentIsChanged = True

MakeDocForm.Label4(0).Caption = "0"

MakeDocForm.Label4(1).Caption = str(Now)

MakeDocForm.Label4(2).Caption = str(Now)

MakeDocForm.IconText.Text = "Документ"

MakeDocForm.IconImage.Picture = LoadPicture(App.Path & "\DefDoc.ico")

MakeDocForm.ImageIconText = App.Path & "\DefDoc.ico"

MakeDocForm.Discrip.Text = ""

MakeDocForm.DocumentName = ""

Canceled = False

MakeDocForm.Show vbModal

If Canceled = True Then

DocumentCo = DocumentCo - 1

TotalDocCo = TotalDocCo - 1

ReDim Preserve Documents(DocumentCo)

Exit Sub

End If

MemberDocumentProperty DocumentCo

Documents(DocumentCo).TotalNumber = TotalDocCo

Documents(DocumentCo).OutputFunPointCo = -1

Documents(DocumentCo).OutputDocPointCo = -1

ImageCo = ImageCo + 1

Load ImageIcon(ImageCo)

ImageIcon(ImageCo).Top = Documents(DocumentCo).Y

ImageIcon(ImageCo).Left = Documents(DocumentCo).X

ImageIcon(ImageCo).Visible = True

ImageIcon(ImageCo).Enabled = True

ImageIcon(ImageCo).Picture = LoadPicture(Documents(DocumentCo).ImageIcon)

ImageIcon(ImageCo).Tag = Documents(DocumentCo).TotalNumber

Load ImageText(ImageCo)

ImageText(ImageCo).Top = Documents(DocumentCo).Y + 300

ImageText(ImageCo).Left = Documents(DocumentCo).X

ImageText(ImageCo).Visible = True

ImageText(ImageCo).Enabled = True

ImageText(ImageCo).Caption = Documents(DocumentCo).ImageText

ImageText(ImageCo).Tag = 1 '**************** 1 = Это документ

End Sub

Private Sub MenuPropertyes_Click()

Dim temp As Integer

If MenuFrom >= 0 Then

If ImageText(MenuFrom).Tag = 1 Then

temp = GetDOCIndex(ImageIcon(MenuFrom).Tag)

ShowDocumentProperty temp

MakeDocForm.Show vbModal

MemberDocumentProperty temp

ImageText(MenuFrom).Caption = Documents(temp).ImageText

ImageIcon(MenuFrom).Picture = LoadPicture(Documents(temp).ImageIcon)

End If

Else

End If

End Sub

Private Sub MenuRegistration_Click()

RegistrForm.Show vbModal

End Sub

Public Sub Delete(Index As Integer)

Dim a As Integer

Dim b As Integer

If ImageText(Index).Tag = 1 Then

b = GetDOCIndex(ImageIcon(Index).Tag)

For a = b To DocumentCo - 1

LSet Documents(a) = Documents(a + 1)

Next a

DocumentCo = DocumentCo - 1

End If

For a = 0 To ImageCo

Unload ImageText(a)

Unload ImageIcon(a)

Next a

ImageCo = -1

SaveProject App.Path & "\temp~.prj"

LoadProject App.Path & "\temp~.prj"

ShowProject

End Sub

‘********************

‘Make doc form code

‘********************

Option Explicit

Private Sub Cancel_Click()

Canceled = True

Hide

End Sub

Private Sub Command1_Click()

On Error GoTo Err1

RegDialog2.Flags = cdlOFNHideReadOnly

If Combo1.ListIndex <> (RegistrationCo + 1) Then

RegDialog2.Filter = "Âñå ôàéëû|*.*|" & _

Registrations(Combo1.ListIndex).NameApp & "|" & _

Registrations(Combo1.ListIndex).FileMask

Else

RegDialog2.Filter = "Âñå ôàéëû|*.*"

End If

RegDialog2.ShowOpen

DocumentName.Text = RegDialog2.FileName

Err1:

End Sub

Private Sub Command2_Click()

On Error GoTo Err1

RegDialog.Flags = cdlOFNFileMustExist + cdlOFNHideReadOnly

RegDialog.ShowOpen

IconImage.Picture = LoadPicture(RegDialog.FileName)

ImageIconText = RegDialog.FileName

Err1:

End Sub

Private Sub DocumentName_Change()

DocumentIsChanged = True

End Sub

Private Sub Form_Activate()

DocumentIsChanged = False

End Sub

Private Sub OkButton_Click()

Dim ErrorFlag As Boolean

Dim tmp As Integer

Dim CurObject As Object

Dim retShell As Long

On Error GoTo Err1

If DocumentName.Text = "" Then

MsgBox ("Íåîáõîäèìî çàïîëíèòü ïîëå ""Äîêóìåíò :""")

DocumentName.SetFocus

Exit Sub

End If

If DocumentIsChanged Then

ErrorFlag = False

tmp = FileLen(DocumentName.Text)

If ErrorFlag = True Then

tmp = FreeFile

Open DocumentName.Text For Output As tmp

Close tmp

End If

End If

Hide

Exit Sub

Err1:

If Err.Number = 53 Then

ErrorFlag = True

Else

Select Case MsgBox("Ïðîèçîøëà îøèáêà íîìåð :" & Err.Number & _

Chr(13) & Chr(10) _

& Err.Description, vbAbortRetryIgnore + vbCritical)

Case vbAbort

End

Case vbRetry

Resume 0

End Select

End If

Resume Next

End Sub

‘***********************

‘ registration form code

‘***********************

Option Explicit

Dim CurIndex As Integer

Private Sub Browser_Click()

On Error GoTo Err1

RegDialog.Flags = cdlOFNFileMustExist + cdlOFNHideReadOnly

RegDialog.ShowOpen

Path = RegDialog.FileName

Err1:

End Sub

Private Sub Cancel_Click()

LoadRegCards

Hide

End Sub

Private Sub Combo1_Click()

ShowRegCard Combo1.ListIndex

End Sub

Private Sub DestroyReg_Click()

Dim a As Integer

For a = CurIndex To RegistrationCo - 1

LSet Registrations(a) = Registrations(a + 1)

Next a

RegistrationCo = RegistrationCo - 1

If RegistrationCo > -1 Then

ReDim Preserve Registrations(RegistrationCo)

If CurIndex > RegistrationCo Then CurIndex = CurIndex - 1

ComboRemake

CardShow CurIndex

Combo1.ListIndex = CurIndex

'ShowRegCard CurIndex

Else

EnabledAll RegistrationCo

End If

EnabledAll RegistrationCo

End Sub

Private Sub Form_Activate()

EnabledAll RegistrationCo

If RegistrationCo = -1 Then Exit Sub

ComboRemake

CurIndex = 0

CardShow CurIndex

Combo1.ListIndex = CurIndex

End Sub

Private Sub NewReg_Click()

TotalRegCo = TotalRegCo + 1

RegistrationCo = RegistrationCo + 1

ReDim Preserve Registrations(RegistrationCo)

Registrations(RegistrationCo).NameApp = InputBox("Ââåäèòå èìÿ ïðèëîæåíèÿ", , "Ïðèëîæåíèå" + str(RegistrationCo + 1))

If Registrations(RegistrationCo).NameApp = "" Then

ReDim Preserve Registrations(RegistrationCo)

TotalRegCo = TotalRegCo - 1

RegistrationCo = RegistrationCo - 1

Exit Sub

End If

Registrations(RegistrationCo).TotalNumber = TotalRegCo

EnabledAll RegistrationCo

ComboRemake

Combo1.ListIndex = RegistrationCo

'ShowRegCard RegistrationCo

'Debug.Print

End Sub

Private Sub OkButton_Click()

MemberCard

SaveRegCards

Hide

End Sub

Private Sub Rename_Click()

Dim a As Integer

Dim str As String

a = Combo1.ListIndex

str = InputBox("Ââåäèòå èìÿ ïðèëîæåíèÿ", , Registrations(a).NameApp)

If str <> "" Then Registrations(a).NameApp = str

ComboRemake

Combo1.ListIndex = a

'ShowRegCard a

End Sub

Private Sub ShowRegCard(NumRegCard As Integer)

MemberCard

CardShow NumRegCard

End Sub

Public Sub ComboRemake()

Dim a As Integer

Combo1.Clear

For a = 0 To RegistrationCo

Combo1.AddItem Registrations(a).NameApp, a

Next a

End Sub

Public Sub EnabledAll(Yes As Integer)

If Yes = -1 Then

ComboRemake

Browser.Enabled = False

DestroyReg.Enabled = False

Combo1.Enabled = False

Rename.Enabled = False

Path.Enabled = False

Discrip.Enabled = False

ListExt.Enabled = False

Path.Text = ""

Discrip.Text = ""

ListExt.Text = ""

Label1.Enabled = False

Label2.Enabled = False

Label3.Enabled = False

Label4.Enabled = False

Else

DestroyReg.Enabled = True

Combo1.Enabled = True

Browser.Enabled = True

Rename.Enabled = True

Path.Enabled = True

Discrip.Enabled = True

ListExt.Enabled = True

Label1.Enabled = True

Label2.Enabled = True

Label3.Enabled = True

Label4.Enabled = True

End If

End Sub

Public Sub CardShow(NumRegCard As Integer)

Path.Text = Registrations(NumRegCard).FileName

ListExt.Text = Registrations(NumRegCard).FileMask

Discrip.Text = Registrations(NumRegCard).Discription

CurIndex = NumRegCard

End Sub

Public Sub MemberCard()

Registrations(CurIndex).FileName = Path.Text

Registrations(CurIndex).FileMask = ListExt.Text

Registrations(CurIndex).Discription = Discrip.Text

End Sub

Приложения

рис 1.1

Рис. 2.2

Рис. 3.1. Основное окно программы

Рис. 3.2. Меню "Правка"

Рис. 3.3. Окно свойств документа