ReSQL.ru
     
powered by simpleCommunicator - 2.0.54     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Обработка _Screen.resize без Bindevent
7 сообщений из 7, страница 1 из 1
Обработка _Screen.resize без Bindevent
    #33133616
Samvel
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Samvel
Участник
У меня все обьекты собраны на _Screen.
Можно ли захватить событие _Screen.resize, если нет, то с каким обьектом связать это событие?
...
Рейтинг: 0 / 0
24.06.2005, 14:45
| Ответить | Цитировать | Написать  
Обработка _Screen.resize без Bindevent
    #33133993
Дмитрий Петров
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Дмитрий Петров
Участник
_Screen.AddObject("Hook","ScrRes")
Define CLASS ScrRes as Custom
oScreen=_Screen
Procedure oScreen.Resize
WAIT WINDOW 'Ресайз..' nowa

Endproc
Enddefine


Запустите и подергайте за скрин ...
...
Рейтинг: 0 / 0
24.06.2005, 16:39
| Ответить | Цитировать | Написать  
Обработка _Screen.resize без Bindevent
    #33134007
Дмитрий Петров
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Дмитрий Петров
Участник
_Screen.AddObject("Hook","ScrRes")
Define CLASS ScrRes as Custom
oScreen=_Screen
Procedure oScreen.Resize
WAIT WINDOW 'Ресайз..' nowa

Endproc
Enddefine


Запустите и подергайте за скрин ...
...
Рейтинг: 0 / 0
24.06.2005, 16:45
| Ответить | Цитировать | Написать  
Обработка _Screen.resize без Bindevent
    #33134387
Samvel
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Samvel
Участник
Спасибо большое. А я добавлял невидимую форму. Наверно твой пример лучше.
...
Рейтинг: 0 / 0
24.06.2005, 21:29
| Ответить | Цитировать | Написать  
Обработка _Screen.resize без Bindevent
    #33135044
Igor Korolyov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Igor Korolyov
Участник
Hi Samvel!

Он конечно перестал работать в VFP8 - но там уже есть bindevents ;)

Posted via ActualForum NNTP Server 1.2
...
Рейтинг: 0 / 0
25.06.2005, 23:46
| Ответить | Цитировать | Написать  
Период между сообщениями больше года.
Обработка _Screen.resize без Bindevent
    #36702432
Alexandr29
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Alexandr29
Участник
У меня похожая задача, но на четвертой строчке кода
выдаёт ошибку "Неизвестный элемент oScreen"
использую VFP 9

и все таки как захватить событие _Screen.resize?
...
Рейтинг: 0 / 0
23.06.2010, 10:28
| Ответить | Цитировать | Написать  
Обработка _Screen.resize без Bindevent
    #36702590
прошелмимо
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
прошелмимо
Участник
примерно так

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
_Screen.AddObject("Hook","myHook")
BindEvent(_screen,"resize",_screen.Hook,"ShowResize")


Define CLASS myHook as Custom
	Procedure ShowResize
		WAIT WINDOW 'Ресайз..' nowa
	Endproc
Enddefine
...
Рейтинг: 0 / 0
23.06.2010, 11:01
| Ответить | Цитировать | Написать  
7 сообщений из 7, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Обработка _Screen.resize без Bindevent
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru       Новости, Чат       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=41&gotonew=1&tid=1585163]:
 0ms
get settings:
 9ms
get forum list:
 11ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 44ms
get topic data:
 13ms
get first new msg:
 8ms
get forum data:
 3ms
get page messages:
 48ms
get tp. blocked users:
 1ms
others: 11ms
total:  154ms
созд. / загр.: 154ms
x
x
Закрыть


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