Потоки в Visual Basic. Курсовая работа (п). Информатика, ВТ, телекоммуникации.

Потоки в Visual Basic. Курсовая работа (п). Информатика, ВТ, телекоммуникации.




💣 👉🏻👉🏻👉🏻 ВСЯ ИНФОРМАЦИЯ ДОСТУПНА ЗДЕСЬ ЖМИТЕ 👈🏻👈🏻👈🏻



























































Вы можете узнать стоимость помощи в написании студенческой работы.


Помощь в написании работы, которую точно примут!

Похожие работы на - Потоки в Visual Basic

Скачать Скачать документ
Информация о работе Информация о работе


Скачать Скачать документ
Информация о работе Информация о работе


Скачать Скачать документ
Информация о работе Информация о работе


Скачать Скачать документ
Информация о работе Информация о работе


Скачать Скачать документ
Информация о работе Информация о работе


Скачать Скачать документ
Информация о работе Информация о работе

Нужна качественная работа без плагиата?

Не нашел материал для своей работы?


Поможем написать качественную работу Без плагиата!

С появлением
оператора AddressOf, часть индустрии ПО стала ориентироваться на авторов,
показывающих как с использованием Visual Basic решать ранее невозможные задачи.
Другая часть быстро охватила консультантов, помогающих пользователям, имеющим
проблемы при решении таких задач.
Проблема не в
Visual Basic или в технологии. Проблема в том, что большинство авторов
применяют одно и тоже правило к AddressOf методикам, что большинство компаний
по разработке ПО считают, что если Вы должны что-то сделать, то Вы сможете.
Идея о том, что применение самой новой и последней технологии должно, по
определению, быть самым лучшим решением проблемы, широко распространена в
индустрии ПО. Эта идея неверна. Развертывание технологии должно управляться
прежде всего проблемой, которую необходимо решить решить, а не технологией,
которую кто-то пробует Вам впарить;).
Очень плохо,
что из-за того, что компании часто пренебрегают упоминанием об ограничениях и
недостатках их инструментальных средств, авторы иногда бывают не в состоянии
обратить внимание читателей на следствия некоторых методик, которые они
описывают. И журналы и книги иногда пренебрегают своей ответственностью, чтобы
удостовериться, что практика программирования, которую они описывают, является
приемлемой.
Программисту
очень важно выбрать необходимый инструмент для своей работы. Это - ваша задача,
чтобы разработать код, который работает теперь не только на одной специфической
платформе, но также работает на разных платформах и системных конфигурациях.
Ваш код должен быть хорошо документирован и поддержан другими программистами,
участвующими в проекте. Ваш код должен следовать правилам, продиктованными
операционной системой или стандартами, которые Вы используете. Отказ так делать
может привести к проблемам в будущем, поскольку системы и программное
обеспечение постоянно совершенствуются.
Недавние статьи
в Microsoft Systems Journal и Visual Basic Programmer's Journal представили
программистам на Visual Basic возможность использования функции API
CreateThread, чтобы непосредственно поддерживать многопоточный режим под Visual
Basic. После этого, один читатель пожаловался, что моя книга Visual Basic
Programmer's Guide to the Win32 API является неполной, потому что я не описал в
ней эту функцию и не продемонстрировал эту технологию. Эта статья - частично
является ответом этому читателю, и частично - ответом на другие статьи,
написанными на эту тему. Эта статья также является дополнением к главе 14 моей
книги "Разработка ActiveX компонент на Visual Basic 5.0" относительно
новых возможностей, обеспечиваемых Visual Basic 5.0 Service Pack 2.
Если Вы уже
хорошо разбираетесь в технологии многопоточного режима, то Вы можете пропустить
этот раздел и продолжать чтение с раздела, названного "Что нового в
Service Pack 2."
Каждый, кто
использует Windows, знает, что Windows способно делать больше чем одну вещь
одновременно. Может одновременно выполнять несколько программ, при одновременном
проигрывании компакт-диска, посылке факса и пересылке файлов. Каждый
программист знает (или должен знать) что ЦЕНТРАЛЬНЫЙ ПРОЦЕССОР компьютера может
только выполнять одну команду одновременно (проигнорируем существование
многопроцессорных машин). Как единственный ЦЕНТРАЛЬНЫЙ ПРОЦЕССОР может
выполнять множество задач?
Это делается
быстрым переключением между многими задачами. Операционная система содержит в
памяти все программы, которые запущены в настоящий момент. Это позволяет
ЦЕНТРАЛЬНОМУ ПРОЦЕССОРУ выполнять программы по очереди. Каждый раз происходит
переключение между программами, при этом меняется содержимое внутренних
регистров, включая указатель команды и указатель вершины стека. Каждая из таких
"задач" называется потоком выполнения (thread of execution).
В простой
многозадачной системе, каждая программа имеет емеет единственный поток. Это
означает, что ЦЕНТРАЛЬНЫЙ ПРОЦЕССОР начинает выполнение команд в начале
программы и продолжает следуя инструкциям в последовательности, определенной
программой до тех пор, пока программа не завершается.
Скажем,
программа имеет пять команд: B C D и E, которые выполняются последовательно
(никаких переходов нет в этом примере). Когда приложение имеет один поток,
команды будут всегда выполнять в точно том же самом порядке: A, B, C, D и E.
Действительно, ЦЕНТРАЛЬНЫЙ ПРОЦЕССОР может потребовать времени для выполнения
других команд в других программах, но они не будут влиять на это приложение,
если не имеется конфликт над общими ресурсами системы, но это уже отдельная
тема для разговора.
Продвинутая
многопоточная операционная система типа Windows позволяет приложению выполнять
больше чем один поток одновременно. Скажем, команда D в нашем типовом
приложении могла создать новый поток, который стартовал командой B и далее
выполнял последовательность команд C и E. Первый поток был бы все еще A, B, C,
D, E, но когда команда D выполнится, возникнет новый поток, который выполнит
команды бы B, C, E (здесь команды D уже не будет, иначе мы получим еще один
поток).
В каком порядке
будут следовать команды в этом приложении?
Thread 1           A           B           C           D                   E                    
Thread 2                                             B                    C           E
Thread 1           A           B           C           D                              E         
Thread 2                                             B           C                   E
Thread 1           A           B           C           D                                          E
Thread 2                                             B           C           E         
Другими
словами, когда Вы начинаете новый поток выполнения в приложении, Вы никогда не
можете знать точный порядок, в котором команды в двух потоках выполнятся
относительно друг друга. Два потока полностью независимы.
Проект содержит
один модуль кода, в котором содержится две глобальных переменных:
' MTDemo - Multithreading Demo program
' Copyright © 1997 by Desaware Inc. All Rights
Reserved
Public GenericGlobalCounter As Long
' Этот проект
содержит одну форму - frmMTDemo1, которая содержит
' MTDemo - Multithreading Demo program ' Copyright ©
1997 by Desaware Inc. All Rights Reserved
' State = 1 - Loading existing value
' State = 2 - Adding 1 to existing value
' State = 3 - Storing existing value
TotalIncrements = TotalIncrements + 1
If otherdelay >= OtherCodeDelay Then
lblGlobalCounter = Str$(GenericGlobalCounter)
lblVerification = Str$(TotalIncrements)
Эта программа
для моделирования многопоточного режима использует таймер и простой конечный
автомат. Переменная State описывает пять команд, которые эта программа
выполняет. State = 0 - неактивное состояние. State = 1 загружает локальную
переменную глобальной переменной GenericGlobalCounter. State = 2 увеличивает на
единицу локальную переменную. State = 3 запоминает результат в переменной
GenericGlobalCounter и увеличивает переменную TotalIncrements (которая считает
количество приращений переменной GenericGlobalCounter). State = 3 добавляет
дополнительную задержку, представляющую собой время, затраченное на выполнение
других команд в программе.
Функция
UpdateDisplay обновляет три метки на форме, которые показывают текущее значение
переменной GenericGlobalCounter, локального сумматора, и общего количества
приращений.
Каждый сигнал
таймера моделирует цикл ЦЕНТРАЛЬНОГО ПРОЦЕССОРА в текущем потоке. Если Вы
запустите программу, то увидете, что значение переменной GenericGlobalCounter
будет всегда точно равно переменной TotalIncrements, потому что переменная
TotalIncrements показывает количество увеличений счетчика GenericGlobalCounter
потоком.
Но что
случится, когда Вы нажимаете кнопку Command1 и запустите второй экземпляр
формы? Эта новая форма смоделирует второй поток.
Время от
времени, команды выстроятся в линию таким образом, что обе формы загрузят
одинаковое значение GenericGlobalCounter, увеличат и сохранят его. В
результате, значение счетчика увеличится только на единицу, даже при том, что
каждый поток полагал, что он независимо увеличивает значение счетчика. Другими
словами, переменная была увеличена дважды, но значение увеличилось только на
единицу. Если Вы запускаете несколько форм, то сразу заметите, что число
приращений, представляемой переменной TotalIncrements, растет намного быстрее,
чем счетчик GenericGlobalCounter.
Что, если
переменная представляет объектный счет блокировки - который следит, когда
объект должен быть освобожден? Что, если она представляет собой сигнал, который
указывает, что ресурс находится в использовании?
Такая проблема
может привести к появлению ресурсов, постоянно недоступных в системе, к
объекту, блокируемому в памяти, или преждевременно освобожденному. Это может
привести к сбоям приложения.
Этот пример был
разработан, чтобы достаточно просто увидеть проблему, но попробуйте
поэкспериментировать со значением переменной OtherCodeDelay. Когда опасный код
относительно небольшой по сравнению со всей программой, проблемы появятся менее
часто. Хотя это и звучит обнадеживающе, но истина состоит в следующем. Проблемы
Многопоточного режима могут быть чрезвычайно неустойчивы и их трудно
обнаружить. Это означает, что многопоточный режим требует осторожного подхода к
проектированию приложения.
Имеются два
относительно простых способа избежать проблем многопоточного режима.
Избегайте
всеобщего использования глобальных переменных.
Добавьте код
синхронизации везде, где используются глобальные переменные.
Первый подход
используется в основном в Visual Basic. Когда Вы включаете многопоточный режим
в Visual Basic приложения, все глобальные переменные станут локальными для
специфического потока. Это свойственно способу, с которым Visual Basic
выполняет apartment model threading - подробнее об этом позднее.
Первоначальный выпуск
Visual Basic 5.0 позволял использовать многопоточность только в компонентах,
которые не имели никаких элементов пользовательского интерфейса. Так было
потому что они не имели безопасного потока управления формами. Например: когда
Вы создаете форму в Visual Basic, VB дает ей имя глобальной переменной (таким
образом, если Вы имеете форму, именованную Form1, Вы можете непосредственно
обращаться к ее методам, используя Form1.метод вместо того, чтобы объявить
отдельную переменную формы). Этот тип глобальной переменной может вызывать
проблемы многопоточного режима, которые Вы видели ранее. Имелись несомненно
другие проблемы внутри управления формами.
С service pack
2, управление формами Visual Basic было сделано безопасным потоком. Это говорит
о том, что каждый поток имеет собственную глобальную переменную для каждой
формы, определенной в проекте.
Сделав поток
управления формами безопасным, Service pack 2 предоставил возможность с помощью
Visual Basic создавать клиентские приложения, использующие многопоточный режим.
Приложение
должно быть определено как программа ActiveX Exe с установкой запуска из Sub
Main:
' MTDemo2 - Multithreading demo program
' Copyright © 1997 by Desaware Inc. All Rights
Reserved
Declare Function FindWindow Lib "user32"
Alias "FindWindowA" _
(ByVal lpClassName As String, ByVal lpWindowName As
String) As Long
' We need this because Main is called on each new
thread
hwnd = FindWindow(vbNullString, "Multithreading
Demo2")
Первый раз
программа загружает и отображает основную форму приложения. Подпрограмма Main
должна выяснить, является ли это первым потоком приложения, поэтому этот код
выполняется при старте каждого потока. Вы не можете использовать глобальную
переменную, чтобы это выяснить, потому что Visual Basic apartment model хранит
глобальные переменные специфическими для одиночного потока. В этом примере
используется функция API FindWindow, чтобы проверить, была ли загружена
основная форма примера. Имеются другие способы выяснить, является ли это
основным потоком, включая использование объектов синхронизации системы - но это
отдельная тема для разговора.
Многопоточный
режим реализуется созданием объекта в новом потоке. Объект должен быть
определен, используя модуль класса. В этом случае, простой модуль класса
определяется следующим образом:
' MTDemo2 - Multithreading demo program
' Copyright © 1997 by Desaware Inc. All Rights
Reserved
Мы можем
установить переменную формы как nothing после того, как она создана, потому что
после отображения формы она будет сохранена.
' MTDemo2 - Multithreading demo program
' Copyright © 1997 by Desaware Inc. All Rights
Reserved
Set c = CreateObject("MTDemo2.clsMTDemo2")
lblThread.Caption = Str$(App.ThreadID)
Форма
отображает идентификатор потока в метке на форме. Форма содержит две командные
кнопки, одна из которых использует оператор New, другая -использует оператор
CreateObject.
Если Вы
запустите программу внутри среды Visual Basic, то увидите, что формы всегда
создаются в одном и том же потоке. Это происходит, потому что среда Visual
Basic поддерживает только одиночный поток. Если Вы скомпилируете и запустите
программу, то увидите, что подход, использующий CreateObject создает и
clsMTDemo2 и ее форму в новом потоке.
Откуда вся
суета относительно многопоточного режима, если он включает так много потенциальной
опасности? Потому что, в некоторых ситуациях, многопоточный режим может
значительно улучшать эффективность приложения. В некоторых случаях это может
улучшать эффективность некоторых операций синхронизации типа ожидания
завершения приложения. Это позволяет сделать архитектуру приложения более
гибкой. Например, операция Add a long в форме MTDEMO2 со следующим кодом:
Запустите
несколько экземпляров формы, используя кнопку cmdLaunch1. Когда Вы нажимаете на
кнопку cmdLongOp на любой из форм, то увидите, что это действие замораживает
операции на всех других формах. Так происходит, потому что все формы
выполняются в одиночном потоке - и этот поток занят выполнением длинного цикла.
Если Вы запустите несколько экземпляров формы кнопкой cmdLaunch2 и нажимете
кнопку cmdLongOp на форму, то только эта форма будет заморожена - другие формы
будут активными. Они выполняются в собственных потоках, и длинный цикл будет
выполняться только в собственном потоке. Конечно, в любом случае, Вы вероятно
не должны размещать длительные операции такого типа в ваших формах.
Дальше краткое
резюме, когда важен многопоточный режим:
Сервер ActiveX
EXE – без общих ресурсов.
Когда Вы имеете
ActiveX EXE сервер, который Вы собираетесь совместно использовать среди
нескольких приложений, многопоточный режим предотвращает приложения от
нежелательных взаимодействий с друг другом. Если одно приложение выполняет
длинную операцию на объекте в однопоточном сервере, другие приложения будут
вытеснены, т.е. будут ждать, когда освободится сервер. Многопоточный режим
рещает эту проблему. Однако, имеются случаи, где Вы можете хотеть использовать
ActiveX EXE сервер, чтобы регулировать доступ к общедоступнному ресурсу (shared
resource). Например, сервер stock quote, описанный в моей книге Developing
ActiveX Components. В этом случае сервер stock quote выполняется в одиночном
потоке и который доступен для всех приложений, использующих сервер по очереди.
Многопоточный
клиент – выполняемый как ActiveX EXE сервер
Простая форма
этого подхода продемонстрирована в приложении MTDEMO2. Этот подход
используется, когда приложение поддерживает множественные окна, которые должны
исходить из одного приложения, но работать полностью независимо.
Интернет-браузер - хороший пример такого многопоточного клиента, где каждое
окно выполняется в собственном потоке. Здесь следует обратить внимание на то,
что многопоточный режим не должен использоваться как замена для хорошего событийно
управляемого проекта.
В архитектуре
клиент-сервер, многопоточный режим может увеличить эффективность, если Вы
имеете смесь длинных и коротких клиентских запросов. Будьте внимательным, хотя
- если все ваши клиентские запросы имеют подобную длину, многопоточный режим
может фактически замедлять среднее время ответа сервера! Никогда не принимайте
на веру тот факт, что если ваш сервер является многопоточным, то обязательно
его эффективность увеличится.
Верите или нет,
но все это было введением. Часть этого материала является обзором материала,
который описан в моей книге Developing ActiveX Components, другая часть
материала описывает новую информацию для service pack 2.
Теперь,
позволите задавать вопрос, который имеет отношение к многопоточному режиму,
использующему COM (модель многокомпонентных объектов, на которой основаны не
только все Visual Basic объекты, но и другие windows приложения, использующие
технологии OLE).
Многопоточный
режим является потенциально опасным вообще, и особенно попытки многопоточного
кодирования приложений, которые не разработаны для поддержки многопоточного
режима, скорее всего приведут к фатальным ошибкам и сбоям системы.
Как это
возможно, что Visual Basic позволяет Вам создавать объекты и использовать их с
одиночными и многопоточными средами безотносительно к тому, разработаны ли они
для одиночного или многопоточного использования?
Другими словами
- Как многопоточные Visual Basic приложения могут использовать объекты, которые
не разработаны для безопасного выполнения в многопоточной среде? Как могут
другие многопоточные приложения использовать однопоточные объекты Visual Basic?
Коротко: как
COM поддерживает потоки?
Если Вы знаете
COM, то Вы знаете, что COM определяет структуру соглашения. Объект COM
соглашается следовать некоторым правилам так, чтобы этим можно было успешно
пользоваться из любого приложения или объекта, который поддерживает COM.
Большинство
людей сначала думает о интерфейсной части соглашения - о методах и свойствах,
которые предоставляет объект.
Но Вы не можете
не знать того, что COM также определяет поточность как часть соглашения. И
подобно любой части соглашения COM - если Вы нарушаете эти условия, то будете
иметь проблемы. Visual Basic, естественно, скрывает от Вас большинство
механизмов COM, но чтобы понять как использовать многопоточность в Visual
Basic, Вы должны разобраться COM модели потоков.
Однопоточный
сервер - самый простой тип реализации сервера. И самый простой для понимания. В
этом случае EXE сервер выполняется в одиночном потоке. Все объекты создаются в
этом потоке. Все вызовы методов каждого объекта, поддерживаемого сервером
должны прибыть в этот поток.
Но что будет,
если клиент выполняется в другом потоке? В том случае, для объекта сервера
должен быть создан промежуточный объект (proxy object). Этот промежуточный
объект выполняется в потоке клиента и отражает методы и свойства фактического
объекта. Когда вызывается метод промежуточного объекта, он выполняет операции,
необходимые для подключению к потоку объекта, а затем вызывает метод
фактического объекта, используя параметры, переданные к промежуточному объекту.
Естественно, что этот подход требует значительного времени на выполнение
задачи, однако он позволяет выполнить все соглашения. Этот процесс переключения
потоков и пересылки данных от промежуточного объекта к фактическому объекту и
обратно называется marshalling. Эта тема обсуждается в главе 6 моей книги
Developing ActiveX Components.
В случае DLL серверов,
одиночная потоковая модель требует, чтобы все объекты в сервере создавались и
вызывались в том же самом потоке что и первый объект, созданный сервером.
Обратите
внимание, что модель Apartment Threading как определено COM не требует, чтобы
каждый поток имел собственный набор глобальных переменных. Visual Basic таким
образом реализует модель Apartment Threading. Модель Apartment Threading
декларирует, что каждый объект может быть создан в собственном потоке, однако,
как только объект создан, его методы и свойства могут вызываться только тем же
самым потоком, которая создал объект. Если объект другого потока захочет иметь
доступ к методам этого объекта, то он должен действовать через промежуточный
объект.
Такая модель
относительно проста для реализации. Если Вы устраняете глобальные переменные
(как делает Visual Basic), модель Apartment Threading автоматически гарантирует
безопасность потока - так как каждый объект действительно выполняется в
собственном потоке, и благодаря отсутствию глобальных переменных, объекты в
разных потоках не взаимодействуют друг с другом.
Модель
свободных потоков (Free Threading Model) заключается в следующем.. Любой объект
может быть создан в любом потоке. Все методы и свойства любого объекта могут
быть вызываны в любое время из любого потока. Объект принимает на себя всю
ответственность за обработку любой необходимой синхронизации.
Это самая
трудная в реализации модель, так как требуется, чтобы всю синхронизацию
обрабатывал программист. Фактически до недавнего времени, технология OLE
непосредственно не поддерживала эту модель! Однако, с тех пор marshalling
никогда не требуется и это наиболее эффективная модель потоков.
Какую модель
поддерживает ваш сервер?
Как приложение
или сама Windows узнает, которую модель потоков использует сервер? Эта
информация включена в системный реестр (registry). Когда Visual Basic создает
объект, он проверяет системный реестр, чтобы определить, в каких случаях
требуется использовать промежуточный объект (proxy object) и в каких -
marshalling.
Эта проверка
является обязанностью клиента и необходима для строгой поддержки требований
многопоточности для каждого объекта, которого он создает.
Теперь давайте
посмотрим, как с Visual Basic может использоваться функция API CreateThread.
Скажем, Вы имеете класс, что Вы хотите выполненять в другом потоке, например,
чтобы выполнить некоторую фоновую операцию. Характерный класс такого типа мог
бы иметь следующий код (из примера MTDemo 3):
' MTDemo 3 - Multithreading example
' Copyright © 1997 by Desaware Inc. All Rights
Reserved
Public Function DoTheCount(ByVal finalval&) As
Boolean
Call MessageBox(0, "Done with counting",
"", 0)
Класс
разработан так, чтобы функция DoTheCount могла неоднократно вызываться из
непрерывного цикла в фоновом потоке. Мы могли бы поместить цикл непосредственно
в сам объект, но вы вскоре увидите, что были веские причины для проектирования
объекта как показано в примере. При первом вызове функции DoTheCount появляется
MessageBox, в котором показан идентификатор потока, по которому мы можем
определить поток, в котором выполняется код. Вместо VB команды MessageBox
используется MessageBox API, потому что функция API, как известно, поддерживает
безопасное выполнение потоков. Второй MessageBox появляется после того, как
закончен подсчет и сгенерировано событие, которое указывает, что операция
закончена.
Фоновый поток
запускается при помощи следующего кода в форме frmMTDemo3: Private Sub
cmdCreateFree_Click()
Функция
StartBackgroundThreadFree определена в модуле modMTBack следующим образом:
Declare Function CreateThread Lib "kernel32"
_
(ByVal lpSecurityAttributes As Long, ByVal _
dwStackSize As Long, ByVal lpStartAddress As Long, _
ByVal lpParameter As Long, ByVal dwCreationFlags _
As Long, lpThreadId As Long) As Long
Declare Function CloseHandle Lib "kernel32"
_
' Start the background thread for this object
' using the invalid free threading approach.
Public Function StartBackgroundThreadFree (ByVal qobj
As clsBackground)
hnd = CreateThread(0, 2000, AddressOf _
BackgroundFuncFree, threadparam, 0, threadid)
StartBackgroundThreadFree = threadid
Функция
CreateThread имеет шесть параметров:
lpSecurityAttributes
- обычно устанавливается в нуль, чтобы использовать заданные по умолчанию
атрибуты защиты.
dwStackSize -
размер стека. Каждый поток имеет собственный стек.
lpStartAddress
- адрес памяти, где стартует поток. Он должен быть равен адресу функции в
стандартном модуле, полученном при использовании оператора AddressOf.
lpParameter -
long 32 разрядный параметр, который передается функции, запускающей новый
поток.
dwCreationFlags
- 32 бит переменная флагов, которая позволяет Вам управлять запуском потока
(активный, приостановленный и т.д.). Подробнее об этих флагах можно почитать в
Microsoft's online 32 bit reference.
lpThreadId -
переменная, в которую загружается уникальный идентификатором нового потока.
Функция
возвращает дескриптор потока.
В этом случае
мы передаем указатель на объект clsBackground, который мы будем использовать в
новом потоке. ObjPtr восстанавливает значение указателя интерфейса в переменную
qobj. После создания потока закрывается дескриптор при помощи функции CloseHandle.
Это действие не завершает поток, - поток продолжает выполняться до выхода из
функции BackgroundFuncFree. Однако, если мы не закрыли дескриптор, то объект
потока будет существовать даже после выхода из функции BackgroundFuncFree. Все
дескрипторы потока должны быть закрыты и при завершении потока система
освобождает занятые потоком ресурсы.
Функция
BackgroundFuncFree имеет следующий код:
' This is an invalid approach, though it works
Public Function BackgroundFuncFree(ByVal param As
IUnknown) As Long
Do While Not qobj.DoTheCount(100000)
Параметром этой
функции является- указатель на интерфейс (ByVal param As IUnknown). При этом мы
можем избежать неприятностей, потому что под COM каждый интерфейс основывается
на IUnknown, так что такой тип параметра допустим независимо от типа интерфейса,
передаваемого функции. Мы, однако, должны немедленно определить param как тип
объекта, чтобы затем его использовать. В этом случае qobj установливается как
объект clsBackground, который был передан к объекту StartBackgroundThreadFree.
Функция затем
выполняет бесконечный цикл, в течение которого может выполняться любая
требуемая операция, в этом случае повторный счет. Подобный подход мог бы
использоваться здесь, чтобы выполнить операцию ожидания, которая
приостанавливает поток пока не произойдкт системное событие (типа завершения
процесса). Поток затем мог бы вызвать метод класса, чтобы сообщить приложению,
что событие произошло.
Доступ к
объекту qobj чрезвычайно быстр из-за использования подхода свободного потока
(free threading) - никакая переадресация (marshalling) при этом не
используется.
Обратите
внимание на то, что если Вы попробуете использовать объект clsBackground,
который показывает форму, то это приведет к сбоям приложения. Обратите также
внимание на то, что событие завершения никогда не происходит в клиентской
форме. Действительно, даже Microsoft Systems Journal, который описывает этот
подход, содержит очень много предупреждений о том, что при использовании этого
подхода есть некоторые вещи, которые не работают.
Некоторые
разработчики, кто пробовали развертывать приложения, применяющие этот тип
многопоточности, обнаружили, что их приложения вызывают сбои после обновления к
VB5 service pack 2.
Является ли это
дефектом Visual Basic?
Означает ли
это, что Microsoft не обеспечила совместимость?
Проблема не в
Microsoft или Visual Basic.
Проблема
состоит в том, что вышеупомянутый код является мусором.
Проблема проста
- Visual Basic поддерживает объекты и в модели одиночного потока и в apartment
model. Позвольте мне перефразировать это: объекты Visual Basic являются COM
объектами и они,согласно COM соглашению, будут правильно работать как в модели
одиночного потока так и в apartment model. Это означает, что каждый объект
ожидает, что любые вызовы методов будут происходить в том же самом потоке,
который создал объект.
Пример,
показанный выше, нарушает это правило.
Это означает,
что поведение объекта подчиненно изменениям, так как Visual Basic постоянно
модифицируется.
Это означает,
что любая попытка объекта обратиться к другим объектам или формам может
потерпеть неудачу и что причины отказов могут изменяться, поскольку эти объекты
модифицируются.
Это означает,
что даже код, который сейчас работает, может внезапно вызвыть сбой, поскольку
другие объекты добавляются, удаляются или изменяются.
Это означает,
что невозможно характеризовать поведение приложения или предсказать, будет ли
оно работать или может ли работать в любой данной среде.
Это означает,
что невозможно предсказать, будет ли код работать на любой данной системе, и
что его поведение может зависеть от используемой операционной, числа
используемых процессоров и других проблем конфигурации системы.
Вы видите, что
как только Вы нарушаете соглашение COM, Вы больше не защищены теми
возможностями COM, которые позволяют объектам успешно взаимодействовать друг с
другом и с клиентами.
Этот подход
является программной алхимией. Это безответственно и ни один программист не
должен когда-либо использовать это. Точка.
Теперь, когда я
показал Вам, почему подход к использованию CreateThread API, показанный в
некоторых статьях, является мусором, я покажу Вам, как можно использовать эту
API функцию безопасно. Прием прост - Вы должны просто твердо придержаться соглашения
COM о потоках. Это займет немного больше времени и усилий, но практика
показала, что получаются очень надежные результаты.
Пример MTDEMO3
демонстрирует этот подход в форме frmMTDemo3, имеющей код, который запускает
класс фона в apartment model следующим образом:
Пока это
выглядит очень похоже на подход свободных потоков. Вы создаете экземпляр класса
и передаете его функции, которая запускает фоновый поток. В модуле modMTBack
появляется следующий код:
Declare Function CoMarshalInterThreadInterfaceInStream
Lib _
"ole32.dll" (riid As GUID, ByVal pUnk As
IUnknown, _
Declare Function CoGetInterfaceAndReleaseStream Lib _
"ole32.dll" (ByVal pStm As Long, riid As
GUID, _
Declare Function CoInitialize Lib
"ole32.dll" (ByVal _
Declare Sub CoUninitialize Lib "ole32.dll"
()
' Start the background thread for this object
Public Function StartBackgroundThreadApt(ByVal qobj As
clsBackground)
res = CoMarshalInterThreadInterfaceInStream
(IID_IDispatch, qobj, threadparam)
hnd
Похожие работы на - Потоки в Visual Basic Курсовая работа (п). Информатика, ВТ, телекоммуникации.
Контрольная Работа На Тему Ремонт Внутрицеховых Электросетей И Источников Освещения
Реферат: Бисмарк Отто Эдуард Леопольд Фон Шенхаузен
Шпаргалка: Фінанси підприємства 2
Реферат: Рак кожи 2
Животноводства Курсовая Работа
Эссе Что Такое Человеческое Достоинство
Практическая Психология В Спорте Реферат
Дипломная работа по теме Художественная обработка материалов на уроках технологии
Многодетная Семья Дипломная Работа
Реферат: 10 Sensible Diet Tips Guaranteed To Work
Курсовая Работа На Тему Передняя Подвеска Ваз 2110
Курсовая работа: Автоматизированный учет выполнения работ в фотоателье
Реферат: Время появления культурно-исторического центра
Диссертации По Лечению Верхнеампулярного Отдела Прямой Кишки
Сочинение По Истории Восстание Декабристов
Урфу Практика Отчет
Реферат: Напрямки залучення іноземних інвестицій у вітчизняне виробництво
Курсовая работа по теме Учет поступления материалов
Реферат по теме Культура Китая Древность и средневековье
Реферат: Учет финансовых вложений (инвестиций) и ценных бумаг
Реферат: Кирога, Васко де
Реферат: Генезис поняття "технологічна культура"
Курсовая работа: Анализ потребности в инвестициях на уровне государства

Report Page