Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Запуск процедуры при раскрытии формы. / 4 сообщений из 4, страница 1 из 1
13.04.2008, 09:43
    #35251771
stoopper
stoopper
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Запуск процедуры при раскрытии формы.
Здравствуйте!
Собственно и вопрос. Есть свернутая форма. Можно ли запустить процедуру при ее раскрытии?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
13.04.2008, 10:47
    #35251792
Андрей К
Андрей К
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Запуск процедуры при раскрытии формы.
По-видимому, повесить эту процедуру на событие Activate этой формы
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
13.04.2008, 19:07
    #35252092
ВладимирМ
ВладимирМ
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Запуск процедуры при раскрытии формы.
При изменении размеров формы срабатывает событие Form.Resize. Текущее состояние формы определяется свойством Form.WindowState.

Следовательно, надо при каждом срабатывании события Form.Resize сравнивать текущее состояние формы с ее состоянием при предыдущем срабатывании этого события.

Если предыдущее значение Form.WindowState = 1, а текущее Form.WindowState отлично от 1 значит, форма была развернута из минимизированного состояния. Либо в нормальное состояние (0), либо на максимум (2).

Остается только организовать хранение предыдущего значения свойства Form.WindowState либо заведя новое свойство формы, либо используя свойство Form.Tag.

Тогда код события Form.Resize() будет примерно таким:

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
**** Form.Resize
IF VAL(ThisForm.Tag) =  1  AND ThisForm.WindowState <>  1 
* Форма развернута из минимизированного состояния
ENDIF

* Сохраняю текущее состояние формы
ThisForm.Tag = LTRIM(STR(ThisForm.WindowState))

Свойство Tag может принимать только и исключительно символьные значения. Поэтому в коде используется конвертация. Если использовать собственное свойство формы, то конвертация не нужна. Можно хранить числа как числа.

PS: Событие Activate срабатывает при активизации формы. А это происходит не только при разворачивании формы. В данном случае Activate не подходит.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
14.04.2008, 09:54
    #35252647
stoopper
stoopper
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Запуск процедуры при раскрытии формы.
Всем спасибо!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Запуск процедуры при раскрытии формы. / 4 сообщений из 4, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 400ms
Закрыть
start [/forum/topic.php?fid=41&mobile=1&tid=1587895]:
 0ms
get settings:
 8ms
get forum list:
 16ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 81ms
get topic data:
 12ms
get forum data:
 3ms
get page messages:
 43ms
get tp. blocked users:
 2ms
others: 227ms
total:  400ms
x
x
Закрыть


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