ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Запуск Форму
7 сообщений из 7, страница 1 из 1
Запуск Форму
    #33267583
Fox+
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Fox+
Гость
Как можно откл. повторно запуск форму?
спосибо
...
Рейтинг: 0 / 0
13.09.2005, 23:57:17
| Ответить | Цитировать | Написать  
Запуск Форму
    #33267599
Фотография Анатолий Широков
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Анатолий Широков
Участник
Код: plaintext
1.
2.
3.
4.
5.
6.
public poForm

if type('m.poForm') == 'O' and !isnull(m.poForm)
    m.poForm.Show
else
    do form myform name poForm linked
endif
...
Рейтинг: 0 / 0
14.09.2005, 00:40:37
| Ответить | Цитировать | Написать  
Запуск Форму
    #33268011
Фотография ВладимирМ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ВладимирМ
Участник
По возможности, следует избегать переменных типа PUBLIC. Проверить факт сущетсвования формы можно гораздо проще.

Как проверить факт существования (использования, открытия) формы

Код: plaintext
1.
2.
3.
IF TYPE("_VFP.Forms('MyForm')")="U"  
	* Формы со свойством name = MyForm не существует (не открыта)  
ENDIF

Обратите внимание, что здесь используется системная переменная _VFP. Использовать аналогичный синтаксис с системной переменной _SCREEN - не получиться. Коллекция _SCREEN.Forms() не принимает в качестве параметра символьные значения. Только числовые.
...
Рейтинг: 0 / 0
14.09.2005, 10:30:30
| Ответить | Цитировать | Написать  
Запуск Форму
    #33268022
leaf
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
leaf
Участник
может кому и не понравиться
но есть еще способ
в лоаде формы в контейнере _screen перебором ищете форму по имени
если находите загрузка формы не происходит а происходит активация уже запущенного экземпляра формы
удачи в реализации ....
...
Рейтинг: 0 / 0
14.09.2005, 10:32:50
| Ответить | Цитировать | Написать  
Запуск Форму
    #33268033
leaf
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
leaf
Участник
как вседа владимир знает способ лучше
...
Рейтинг: 0 / 0
14.09.2005, 10:35:38
| Ответить | Цитировать | Написать  
Запуск Форму
    #33270160
Igor Korolyov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Igor Korolyov
Участник
Hi leaf!

До Form.Load происходит куча всего - в частности загружается DE,
соответственно открываются таблицы, могут выполняться запросы, создаются
коннекции к удалённым данным - в общем для ОБЩЕГО случая Form.Load это уже
слишком поздно - так что проверку стоит всё-же выполнять ДО попытки создания
нового экземпляра формы.

Posted via ActualForum NNTP Server 1.3
...
Рейтинг: 0 / 0
15.09.2005, 03:42:31
| Ответить | Цитировать | Написать  
Запуск Форму
    #33271097
GoshaS
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
GoshaS
Участник
Я смотрю через wexist(имя формы)
.T. - форма открыта, .F. - нет такой формы.
...
Рейтинг: 0 / 0
15.09.2005, 13:16:36
| Ответить | Цитировать | Написать  
7 сообщений из 7, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Запуск Форму
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=41&gotonew=1&tid=1593476]:
 0ms
get settings:
 6ms
get forum list:
 12ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 209ms
get topic data:
 7ms
get first new msg:
 4ms
get forum data:
 2ms
get page messages:
 30ms
get tp. blocked users:
 1ms
others: 204ms
total:  479ms
созд. / загр.: 479ms
x
x
Закрыть


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