powered by simpleCommunicator - 2.0.56     © 2025 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Modeless
7 сообщений из 7, страница 1 из 1
Modeless
    #35721906
Делал раньше так при выгрузке, чтобы висела форма с процессом выгрузки.
Но сейчас надо, чтобы в конце форма осталось активной, в ней будет лог произведенных операций. Как это сделать правильно???
Думал поместить выгрузку внутрь формы, но не ясно куда именно?

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
DO FORM Uploading NAME frmUploading LINKED
IF THISFORM.ExportData() THEN
  RELEASE frmUploading
  MESSAGEBOX("Выгрузка произведена.", 0 + 64 ,"Сообщение")
ELSE
  RELEASE frmUploading
ENDIF
...
Рейтинг: 0 / 0
Modeless
    #35721925
Galyamov Rinat
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
> DO FORM Uploading NAME frmUploading LINKED
.....


LINKED
Убери - форма останется висеть. Только не забудь, что ее теперь самому
убивать надо (Добавь на форму кнопку отмена или крестик справа активным
сделай.)


Posted via ActualForum NNTP Server 1.4
...
Рейтинг: 0 / 0
Modeless
    #35722036
Может есть еще какой способ?
Мне нужно следующее поведение.
1. Нажимаю на кнопку выгрузки
2. Показывается форма с процессом выгрузки
3. Процесс выгрузки завершается на форме становится активна кнопка "Выход"
4. Пользователь может продолжить работу только, если выйдит из формы.
...
Рейтинг: 0 / 0
Modeless
    #35722049
Galyamov Rinat
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
> 4. Пользователь может продолжить работу только, если выйдит из формы.

Значит Эта форма должны быть модальной.
Логику переносив нее и делай ее модальной и привет


Posted via ActualForum NNTP Server 1.4
...
Рейтинг: 0 / 0
Modeless
    #35722095
Сделал проще. Переменную внес в состав формы, из которой вызывается эта. Теперь стало выглядеть так.
Код: plaintext
1.
2.
DO FORM Uploading NAME THISFORM.frmUploading

...
Рейтинг: 0 / 0
Modeless
    #35722293
Galyamov Rinat
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
> Автор: _Интересующийся
> Сделал проще. Переменную внес в состав формы, из которой вызывается
> эта. Теперь стало выглядеть так.
>
> DO FORM Uploading NAME THISFORM.frmUploading

И ?

1) LINK убрал - форма уже не будет уничтожаться, когда уничтожится
переменная, ссылающаяся на нее.
Смысл переносить ссылку в свойство формы?

2) Теперь пока пользователь не закроет вторую формы он дальше работать не
может? А ты проверял?




Posted via ActualForum NNTP Server 1.4
...
Рейтинг: 0 / 0
Modeless
    #35722384
Поведение именно такое, какое мне нужно было.

DO FORM Uploading NAME THISFORM.frmUploading

Во время выгрузки данных общаюсь с формой через переменную THISFORM.frmUploading (обновляю статистику и процесс хода операции)
После обе формы становятся доступны пользователю, и родитель и потомок.
Потомок может быть закрыт по кнопке Exit, если же пользователь вновь нажмет кнопку выгрузки, то я проверяю переменную THISFORM.frmUploading на предмет существования формы, и если она есть, то делаю THISFORM.frmUploading.Release() и снова создаю

DO FORM Uploading NAME THISFORM.frmUploading

Все нормально работает.
...
Рейтинг: 0 / 0
7 сообщений из 7, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Modeless
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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