powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / WinSock и DoEvents
6 сообщений из 6, страница 1 из 1
WinSock и DoEvents
    #32375365
Саша.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Возникла у меня такая проблема. Мне надо, чтобы по DoEvents на события реагировали все событийные процедуры кроме Socket_DataArrival. Как это можно реализовать?
...
Рейтинг: 0 / 0
WinSock и DoEvents
    #32375531
andreiy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Private flag as Boolean
.......
.......
DoEvents
flag = true
.......
.......
Private Sub Socket_DataArrival()
If flag then Exit Sub
.......
.......
если я тебя правильно понял
...
Рейтинг: 0 / 0
WinSock и DoEvents
    #32375585
Саша.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Все бы хорошо, но данные, которые приходят в DataArrival мне нужны. Но читать их я должен только после того, как обработаю предыдущие. И вот в этот промежуток времени (пока идет обработка предыдущих данных) мне надо кликать и т.д.
...
Рейтинг: 0 / 0
WinSock и DoEvents
    #32375725
andreiy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Поясни один вопрос. Тебе важно обрабатывать приходящие данные последоательно, а когда их читать, я так понимаю неважно?
...
Рейтинг: 0 / 0
WinSock и DoEvents
    #32375752
Саша.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Вот именно.
При этом накопление пришедших данных в каком-нибудь хранилище не очень желательно
...
Рейтинг: 0 / 0
WinSock и DoEvents
    #32377379
zFr
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
zFr
Гость
а если так попробовать:
:-))
private n as integer, ni as integer
...
private sub form_load()
ni = 1
...
end sub
...
Private Sub Socket_DataArrival()
dim li as integer
n = n + 1
li = n
do until li = ni
doEvents
loop
...
...
ni = ni+1
if ni > n then ni = 1: n =0
end sub
...
Рейтинг: 0 / 0
6 сообщений из 6, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / WinSock и DoEvents
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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