Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Создание *.exe из проекта с потоками / 3 сообщений из 3, страница 1 из 1
02.11.2006, 12:52
    #34100528
Slice
Slice
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Создание *.exe из проекта с потоками
Написал програмку с использованием потоков и так как у меня встречаются такие вещи как CreateObject, пришлось использовать
Код: plaintext
Call CoInitialize( 0 )
и
Код: plaintext
Call CoUninitialize
.
И вот вопрос. В самом бэйсике при открытом проекте, программа работает. А вот когда создаю экзэшник, то виндоус выдает ошибку. Компилировал и P-code и Native code, все равно ОШИБКА.


И еще вопросик.
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
On Error Resume Next
With ThreadFirst
    .Initialize AddressOf VeryBusyProcess
    .Priority = THREAD_PRIORITY_IDLE
    .Enabled = True
End With
With ThreadSecond
    .Initialize AddressOf CurrentProcess
    .Priority = THREAD_PRIORITY_IDLE
    .Enabled = False
End With
Вот так запускаю процессы (тоесть один процесс, второй пока не берем)
потом удет процедура VeryBusyProcess в модуле в которой как раз и находятся функции CoInitialize(0) и CoUninitialize. Между ними сам код процедуры.
Так же есть кнопка выхода (тоесть код еще весь не отработал, а я могу прервать выполнение) и она выглядит так

Код: plaintext
1.
2.
3.
4.
5.
6.
Private Sub Command2_Click()
    Call CoUninitialize
    Set ThreadFirst = Nothing
    Set ThreadSecond = Nothing
    
    Unload Me
End Sub

Эта кнопка все закрывает, а в диспечере задач все равно весит эта программа
может быть кто-нибудь сталкивался с этим. Помогите пожалуйста
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
02.11.2006, 18:59
    #34102188
White Owl
White Owl
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Создание *.exe из проекта с потоками
SliceИ вот вопрос. В самом бэйсике при открытом проекте, программа работает. А вот когда создаю экзэшник, то виндоус выдает ошибку. Компилировал и P-code и Native code, все равно ОШИБКА.А ты синхронизацию доступа к ком-объектам делаешь? Нет? Ну вот и получаешь.

Sliceпотом удет процедура VeryBusyProcess в модуле в которой как раз и находятся функции CoInitialize(0) и CoUninitialize.
1) вынеси CoInitialize/CoUninitialize в главный тред.
2) орагнизуй у себя собственную синхронизацию доступа к ком-объектам, либо запускай CoInitialize(2)

Slice(тоесть код еще весь не отработал, а я могу прервать выполнение) и она выглядит так
Код: plaintext
1.
2.
3.
4.
5.
6.
Private Sub Command2_Click()
    Call CoUninitialize
    Set ThreadFirst = Nothing
    Set ThreadSecond = Nothing
    
    Unload Me
End Sub
Это не прерывание выполнения. Это оставление треда в памяти. Тред надо сначала остановить, потом уже убить ссылку на него.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
07.11.2006, 09:42
    #34108193
Slice
Slice
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Создание *.exe из проекта с потоками
White Owl А ты синхронизацию доступа к ком-объектам делаешь? Нет? Ну вот и получаешь.
2) орагнизуй у себя собственную синхронизацию доступа к ком-объектам, либо запускай CoInitialize(2)
Это не прерывание выполнения. Это оставление треда в памяти. Тред надо сначала остановить, потом уже убить ссылку на него.


Можно поподробнее по этим пунктам. что надо написать и куда вставить?
или ссылку дай пожалуйста. Тяжеловато без теории пытаться что-нть сделать
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Создание *.exe из проекта с потоками / 3 сообщений из 3, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 464ms
Закрыть
start [/forum/topic.php?fid=60&tablet=1&tid=2165025]:
 0ms
get settings:
 7ms
get forum list:
 20ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 158ms
get topic data:
 11ms
get forum data:
 2ms
get page messages:
 52ms
get tp. blocked users:
 1ms
others: 207ms
total:  464ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]