Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Имя формы / 4 сообщений из 4, страница 1 из 1
29.03.2007, 13:50
    #34424608
StandD
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Имя формы
Всем привет!

Столкнулся с проблемой.
Есть форма "scan", МОДАЛ=1, на ней таймер, запускающий процедуру проверки данных и обновления объектов формы. На форме есть кнопка.


В таком варианте таймера
if type("_screen.ActiveForm")=="O" .and. _screen.ActiveForm.Name="SCAN" .or. type("_screen.ActiveForm")=="O" .and. _screen.ActiveForm.Name="scan"
.....
endif
тело таймера не работает
Кнопка работает.


В таком варианте
if type("_screen.ActiveForm")=="O"
...
endif
работает.
Но при этом не могу запустить кнопку (открывающаяся форма прячется за главную форму по действию таймера).

Вариант МОДАЛ=0 для главной формы не катит.

Может, кто-то кое-где?
...
Рейтинг: 0 / 0
29.03.2007, 14:18
    #34424716
ВладимирМ
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Имя формы
А так:

Код: plaintext
1.
2.
3.
if type("_screen.ActiveForm")="O" .and. UPPER(_screen.ActiveForm.Name)="SCAN" 
.....
endif
...
Рейтинг: 0 / 0
29.03.2007, 15:18
    #34424938
StandD
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Имя формы
ВладимирМА так:

Код: plaintext
1.
2.
3.
if type("_screen.ActiveForm")="O" .and. UPPER(_screen.ActiveForm.Name)="SCAN" 
.....
endif


Спасибо, попробую. Хотя, честно говоря, странно, что это две большие разницы.
С проблемой справился просто - перед выполнением процедуры кнопки отключал таймер формы, а после отработки включал.
...
Рейтинг: 0 / 0
29.03.2007, 15:19
    #34424947
StandD
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Имя формы
Вдогонку мысль пробила.
А не может это быть от того, что название формы - служебное слово????
...
Рейтинг: 0 / 0
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Имя формы / 4 сообщений из 4, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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