On-line: гостей 0. Всего: 0 [подробнее..]
АвторСообщение
постоянный участник


Пост N: 1252
Зарегистрирован: 09.10.06
ссылка на сообщение  Отправлено: 16.08.16 12:10. Заголовок: Библиотека hbwin - использование wapi_FindFirstChangeNotification()


Впервые FindFirstChangeNotification я использовал много лет назад. Маленькая программа - сторож написанная на С следила за изменениями в почтовом ящике и при получении почты, т.е. появления в определенной входной папке файла типа #DDD_*.*, в зависимоcти от индекса пользователя ( #DDD ), переносила файл из общей папки в почтовый ящик пользователя.

Прочитав соответствующий пост Андрея и посмотрев, что в MiniGUI нет подобного примера (странно, однако ),
решил написать подобного "сторожа" на "чистом" Harbour, используя библиотеку hbwin.








Спасибо: 0 
ПрофильЦитата Ответить
Ответов - 8 [только новые]


постоянный участник


Пост N: 1253
Зарегистрирован: 09.10.06
ссылка на сообщение  Отправлено: 16.08.16 12:12. Заголовок: Вот, что получилось ..


Вот, что получилось
Скрытый текст


Спасибо: 0 
ПрофильЦитата Ответить
постоянный участник


Пост N: 1254
Зарегистрирован: 09.10.06
ссылка на сообщение  Отправлено: 16.08.16 12:16. Заголовок: Программа, получая в..


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

Спасибо: 0 
ПрофильЦитата Ответить
постоянный участник


Пост N: 1255
Зарегистрирован: 09.10.06
ссылка на сообщение  Отправлено: 16.08.16 12:19. Заголовок: Определения из "..


Определения из "hbwin+.ch"

 цитата:
 
#define INFINITE 0xFFFFFFFF

// WaitForSingleObject() returns value
#define WAIT_TIMEOUT 0x00000102
#define WAIT_ABANDONED 0x00000080
#define WAIT_OBJECT_0 0x00000000
#define WAIT_OBJECT_1 ( WAIT_OBJECT_0 + 1 )

// for wapi_Find*ChangeNotification
#define FILE_NOTIFY_CHANGE_FILE_NAME 0x00000001
#define FILE_NOTIFY_CHANGE_DIR_NAME 0x00000002
#define FILE_NOTIFY_CHANGE_ATTRIBUTES 0x00000004
#define FILE_NOTIFY_CHANGE_SIZE 0x00000008
#define FILE_NOTIFY_CHANGE_LAST_WRITE 0x00000010
#define FILE_NOTIFY_CHANGE_SECURITY 0x00000100




Спасибо: 0 
ПрофильЦитата Ответить
постоянный участник


Пост N: 1256
Зарегистрирован: 09.10.06
ссылка на сообщение  Отправлено: 16.08.16 12:48. Заголовок: Некоторые wapi функц..


Некоторые wapi функции
Скрытый текст


Спасибо: 0 
ПрофильЦитата Ответить
администратор




Пост N: 5965
Зарегистрирован: 17.05.05
ссылка на сообщение  Отправлено: 16.08.16 12:55. Заголовок: Петр Это в каком Ha..


Петр
Это в каком Harbour ? В свеже скачанном ни определений , ни таких функций нет.

Спасибо: 0 
ПрофильЦитата Ответить
постоянный участник


Пост N: 1257
Зарегистрирован: 09.10.06
ссылка на сообщение  Отправлено: 16.08.16 14:16. Заголовок: Dima пишет: Петр Э..


Dima пишет:

 цитата:
Петр
Это в каком Harbour ?



Это из личной библиотеки hbwin+
Написанная по правилам (пространство имен, приведение типов) hbwin.
Исходники wapi_Find*ChangeNotification я привел.
Можно включить через #pragma BEGINDUMP

wapi_WaitFor* из hbwin

Спасибо: 0 
ПрофильЦитата Ответить
администратор




Пост N: 5966
Зарегистрирован: 17.05.05
ссылка на сообщение  Отправлено: 16.08.16 14:17. Заголовок: Теперь я понял почем..


Теперь я понял почему плюсик тут #include "hbwin+.ch" , думал очепятка :)

Спасибо: 0 
ПрофильЦитата Ответить
постоянный участник


Пост N: 1258
Зарегистрирован: 09.10.06
ссылка на сообщение  Отправлено: 16.08.16 14:21. Заголовок: hbwin лучше брать из..


hbwin лучше брать из harbour-core от Виктора.
Время от времени он библиотеку обновляет.
В core фактически развитие приостановилось, м.б. из-за высокой планки требований установленных таким таки Виктором.

Спасибо: 0 
ПрофильЦитата Ответить
Ответ:
1 2 3 4 5 6 7 8 9
большой шрифт малый шрифт надстрочный подстрочный заголовок большой заголовок видео с youtube.com картинка из интернета картинка с компьютера ссылка файл с компьютера русская клавиатура транслитератор  цитата  кавычки моноширинный шрифт моноширинный шрифт горизонтальная линия отступ точка LI бегущая строка оффтопик свернутый текст

показывать это сообщение только модераторам
не делать ссылки активными
Имя, пароль:      зарегистрироваться    
Тему читают:
- участник сейчас на форуме
- участник вне форума
Все даты в формате GMT  3 час. Хитов сегодня: 86
Права: смайлы да, картинки да, шрифты да, голосования нет
аватары да, автозамена ссылок вкл, премодерация откл, правка нет