powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Работа программы в systray-е
9 сообщений из 9, страница 1 из 1
Работа программы в systray-е
    #33438776
Krushinskaya Olga
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Программа работает резедентно.
Подскажите, что необходимо сделать, чтобы программа через определеннный промежуток времени соединялась с базой, и анализировала, если появилась в базе новая запись, то программа выкидывает формочку. Каким образом это сделать, предполагаю что через таймер, но как
...
Рейтинг: 0 / 0
Работа программы в systray-е
    #33439475
Krushinskaya Olga
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Неужели никак ;-(
1. Мне хотя бы узнать код, как пользоваться таймером, чтобы через 1 час, например, программа сканировала базу на наличие обновлений.
2. И еще, написала, чтобы при нажатии правой кнопки мышки на иконке в systraye выплывало менюшка, а она не работает, не появляется, а после этого наатия и событие по двойному клику тоже не срабатывает. А если я после запуска проги нажимаю двойной щелчок на иконке, то событие срабатывает.
Думаю, что где то я путаюсь в read events
...
Рейтинг: 0 / 0
Работа программы в systray-е
    #33439571
Igor Korolyov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Hi Olga!

Скачай с сайта Foxclub.ru исходники программы HTTP2NNTP - она болтается в
трее - можешь посмотреть как там это сделано (там использован
модифицированный класс из systray.vcx - т.к. изначально там контекстное меню
горбатое :( )

Насчёт "соединялась с базой и т.п." - тут уж извини, но ничено не понятно.
Что есть база? dbc на сервере? MS SQL, Oracle или другое? Как вообще
работать с твоей базой ты представляешь? Тогда не понимаю в чём проблема
написать соответствующий код в Timer event объекта Timer - который можно или
на твою главную форму кинуть, или просто как глобальный объект создать
(описав класс таймера с нужным кодом конечно).

Posted via ActualForum NNTP Server 1.3
...
Рейтинг: 0 / 0
Работа программы в systray-е
    #33440053
Krushinskaya Olga
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Насчёт "соединялась с базой и т.п." - тут уж извини, но ничено не понятно.
Что есть база? dbc на сервере? MS SQL, Oracle или другое? Как вообще
работать с твоей базой ты представляешь? Тогда не понимаю в чём проблема
написать соответствующий код в Timer event объекта Timer - который можно или
на твою главную форму кинуть, или просто как глобальный объект создать
(описав класс таймера с нужным кодом конечно).

Даже не База dbc, а одна таблица в базе, лежит на сервере. Один пользователь работает с этой таблицей, добавляя туда постепенно информацию. А у других пользователей, у которых именно и висит программа резидентно, должна программа просматривать таблицу на наличие новых записей, и выдавать на экран пользователю, что-то типа, "для вас появилась новая информация". Т.е. реализовать, что-то типа оповещения. Может это оповещение опытными программистами не так должно реализовываться, тогда хоть намекните, как оповещать людей в реал таймере. Заранее благодарна.
...
Рейтинг: 0 / 0
Работа программы в systray-е
    #33440147
Krushinskaya Olga
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Скачай с сайта Foxclub.ru исходники программы HTTP2NNTP - она болтается в


Не могу найти прогу HTTP2NNTP. В РЕШЕНИЯХ искать?
...
Рейтинг: 0 / 0
Работа программы в systray-е
    #33440167
AleksMed
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Krushinskaya OlgaСкачай с сайта Foxclub.ru исходники программы HTTP2NNTP - она болтается в


Не могу найти прогу HTTP2NNTP. В РЕШЕНИЯХ искать?
Тут
...
Рейтинг: 0 / 0
Работа программы в systray-е
    #33440635
piva
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ну наверное что-нибудь так
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
31.
32.
33.
34.
35.
36.
37.
38.
39.
Define Class .....
....
....
...
	Procedure TrayNotify
	With this
		Local m.text, tmp[ 1 ]

		Select Max(docid) from (.Alias) into array tmp
		If _TALLY >  0 
			If .LastCheckID # TMP[ 1 ]
				.LastCheckID=TMP[ 1 ]
				Select Name,Text from (.Alias) where Docid=(.LastCheckID) into array tmp

				m.text=Alltrim(tmp[ 1 ])+crlf+Alltrim(tmp[ 2 ])

				.Tray.IconFile="Main.ICO"
				.Tray.AddIconToSysTray()
				.Tray.TipText=<тут текст сообщения	>			.Tray.ShowBalloonTip(m.text,"Объявление", 2 , 0 )

			EndIf
		EndIf
		
	EndWith

	Procedure Timer.Timer
	With this
		This.Parent.TrayNotify()
	EndWith
	
EndDefine

Define Class Tray as SysTray of progs\systray.prg
	MenuText=""

	Procedure IconClickEvent
	This.RemoveIconFromSystray()	
	Endproc

EndDefine
...
Рейтинг: 0 / 0
Работа программы в systray-е
    #33440655
Krushinskaya Olga
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
AleksMed Krushinskaya OlgaСкачай с сайта Foxclub.ru исходники программы HTTP2NNTP - она болтается в


Не могу найти прогу HTTP2NNTP. В РЕШЕНИЯХ искать?
Тут

не могу скачать, хоть убей ;(((
...
Рейтинг: 0 / 0
Работа программы в systray-е
    #33440665
Krushinskaya Olga
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Я поняла, что я ничего не поняла ;-)
Спасибочки.
Надо разобраться.;-\
...
Рейтинг: 0 / 0
9 сообщений из 9, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Работа программы в systray-е
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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