Переход-Форма-Форма

[SLIM]

Вот дошел до момента взаимодйствия между формами. Тут соответственно возникли вопросы. Как ПРАВИЛЬНО открыть вторую (и др.) формы из главной. На данный момент я действую методом Show. Но что-то мне подсказывает что это не правильно (видимо название говорит мне). Соответственно закрытие методом Hide. Просто мне кажется что при таком раскладе формы просто висят в воздухе. Видимо и методы эти разработаны для другого. Слышал про оператор Load, но как им пользоваться не знаю.
Есть также событие формы Load, но его невозможно (и впринципе естественно) из другой формы (+Unload).
Так вот. еще раз вопрос: как правильно реализовать взаимодействие между формами. (Кстати еще хотел бы уточнить зачем нужны MDI формы, т.е. зачем я знаю, кто-нибудь использовал и для чего?)

[ZOD]

Form.Hide действительно скрывает форму. При этом она остается в памяти. Для выгрузки формвы из памяти:

Код: Выделить всё

    Unload Form1
    Set Form1 = Nothing

Load`ом соответственно ее можно загрузить обратно.

Примером MDI приложения является Word, Excel, да и сам ВБ6. Наверное их кто-нибудь да использует

[SLIM]

А что происходит при загрузке многоформового приложения? Загружается только одна форма? Или все? Ведь я методом Show показываю, а не загружаю вторую форму. Соответственно следует что ворма загружается при загрузке всего приложения? А если это не так, то значит при методе Shoqw происходит и загрузка формы.

[Alprog]

SLIM
Ты создаёшь в проекте одну главную форму (MDIform) и одну форму "внутреннюю" (form). MDI форма всегда будет загружена, а с помощью Dim ты сможешь загрузить столько копий form, сколько тебе нужно.

К примеру, форма называется frmDocument. Воспользуемся тем, что форма это тоже класс, и создадим новую форму также, как объект любого класса:

Код: Выделить всё

Dim frmD As New frmDocument
frmD.Show

Чтобы лучше разобраться можешь при старте Visual Basic выбрать VB Aplication Wizard и потом жать "Next" до самого конца. Получишь простой, но рабочий пример MDI приложения.

[alibek]

А если это не так, то значит при методе Shoqw происходит и загрузка формы.

Разумеется. Форма загружается при обращении к любому методу или свойству незагруженной формы.

[Хакер]

Вот дошел до момента взаимодйствия между формами.

Я считаю не лишним напомнить, что форма это класс, и тебя должно волновать взаимодействие между экземплярами форм, а не между формами.

На данный момент я действую методом Show. Но что-то мне подсказывает что это не правильно (видимо название говорит мне). Соответственно закрытие методом Hide.

Методы Show и Hide это всё равно что Visible = True и Visuble = False, с единственным отличием, что метод Show позволяет указать владельца окна и модальность показа.

Слышал про оператор Load, но как им пользоваться не знаю.

Нет такого оператора. Есть функция Load.

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

Неужели их ещё кто-то непоиспользовал?

А что происходит при загрузке многоформового приложения?

Ничего из того, что ты думаешь.

Загружается только одна форма? Или все?

Ни загружается ни одного экземмпляра форм. Слово загружается здесь вообще не уместно.
Я напоминаю ещё раз, что форма это класс, и на неё распространяется всё то же поведение, что и на классы. Задай себе вопрос: "Что происходит при загрузке многоклассового приложения? Загружаются все классы или только один?" и сразу поймёшь, насколько это тупо.

Экземпляр формы создаётся явно при создании через оператор New, или неявно, при обращении к сброшенной DAN-ссылке.

МануAll-ная статья о DAN-ссылках к сожалению был утрачена, так бы сейчас отправил читать.

а с помощью Dim ты сможешь загрузить столько копий form, сколько тебе нужно.

Чушь. Ключевую роль здесь играет New. А тот пример, который ты привёл ниже: вообще с DAN-ссылкой, а их (такие ссылки) тщательно не разобравшись с ними, вообще нельзя использовать новичкам.

[Alprog]

Чушь.

Так и знал, что прийдёт Хакер и раскритикует

[Хакер]

К сожалению приходится; иначе один (с неправильно выстроенными причинно-следственными связими) научит другого так, что и второго эти связи будут выстроены так же неправильно.

[Денис]

Потому профессионалы и говорят, что лучшее объяснение - код.
Я почитав форум, вообще отказался от неявного создания экземпляров форм. Всегда делаю модуль, в нем - Sub Main, в ней

Код: Выделить всё

Public fMainForm As frmMain

Sub Main()

  Set fMainForm = New frmMain
  fMainForm.Show

End Sub

По сути, такой "загрузочный" модуль - аналог DPR-файла в Delphi.
Само собой, блоков Set - Show может быть сколько угодно, например:

Код: Выделить всё

  Set fMainForm = New frmMain
  fMainForm.Show

  Set fPropForm = New frmProperties
  fMainForm.Show 0, fMainForm

  Set fToolsForm = New frmToolbar
  fMainForm.Show 0, fMainForm

Здесь, при запуске кода, на экране появляется некая абстрактная Основная Форма, а над ней плавают немодальные формы: Инструменты и Свойства.

[Proxy]

Кстати: а чем плохо выгружаться через END при необходимости завершить прогу? Память, занимаемая прогой не будет перераспределена? Почиму так? Или это чьё-то заблуждение?

[alibek]

Кстати: а чем плохо выгружаться через END при необходимости завершить прогу?

Много чем.
Чтобы в долгие объяснения не вдаваться, хотя бы тем, что маскируется кривизна твоей программы. Если при выгрузке формы программа не завершается, значит у тебя в программе недоработка. По End ты ее не увидишь.

[it.egor]

Если при выгрузке формы программа не завершается, значит у тебя в программе недоработка. По End ты ее не увидишь.

если программа не имеет кода в form_unload, то end использовать можно! иначе лучше писать отдельную процедуру для быстрого завершения программы (канефна, если в проекте много форм и надо выполнять какий-то операции при конце проги)

[Хакер]

it.egor
У тебя программа исчерпытвается формами и их Unload-событиями? То, например, что форм вообще может не быть, зато может быть огромная объектная модель со специальными правилами выгрузки, тебе не очевидно?

[it.egor]

у меня - да... про объектные модели ничего не скажу, тк не приходилось такое делать...

[Viper]

it.egor, не было, не значит, что не будет в будущем. Лучше сразу делать все правильно.

[SLIM]

Ни загружается ни одного экземмпляра форм. Слово загружается здесь вообще не уместно.
Я напоминаю ещё раз, что форма это класс, и на неё распространяется всё то же поведение, что и на классы. Задай себе вопрос: "Что происходит при загрузке многоклассового приложения? Загружаются все классы или только один?" и сразу поймёшь, насколько это тупо.

Ну....это я впринципе уяснил. А что по поводу "выгрузке формы"? Что происходит при закрытии формы. И опять таки. New Form создается при открытии формы (Любой)? Т.е. в этот момент создается та самая ссылка New?

[Хакер]

А что по поводу "выгрузке формы"? Что происходит при закрытии формы.

Скрытие. Ничего более.

С памятью экзмемпляра формы с его объектами ничего при этом не случается. А случается в других случаях. И эти случая распространяются на форму также, как и на обычные классы. Разберись сначала с обычными классами. Тогда все вопросы по формам автоматически отпадут.

И опять таки. New Form создается при открытии формы (Любой)? Т.е. в этот момент создается та самая ссылка New?

Ничего не понял.

[Matew]

Вот пример хороший:
http://bbs.vbstreets.ru/viewtopic.php?p ... b867dc41c3

[Viper]

И опять таки. New Form создается при открытии формы (Любой)? Т.е. в этот момент создается та самая ссылка New?

Если я правильно понял, то мысль была следующая:
"Создается ли при открытии формы ее новый экземпляр?"
Если вопрос был именно этот, то ответ: "Нет".

[SLIM]

Вот пример хороший:

Это не хороший пример...

Скрытие. Ничего более.

Т.е. она в пямяти?

Если вопрос был именно этот, то ответ: "Нет".

Понял верно.

И еще. Я тут повоял следующее. Значит при загрузке формы1 проверяются некоторые значения, при получении определенного результата форма загружается, если нет, то должна выгрузиться. Форма1 загружается допустим при нажатии кнопочки-пимпочки из формы0. Так вот если я на событие кнопочки пишу Load форма1, происходит след-ее. В событии формы1 LoadForm происходит проверка, и если значение не то, то я ее выгружаю Unload. Всего этого я не вижу при нажатии кнопки, но приложение выдает ошибку мол форма уже выгружена. Приложение останавливается на срочке загрузки формы Load Форма1....вот так

[Денис]

SLIM
А если фразу

при загрузке формы1 проверяются некоторые значения, при получении определенного результата форма загружается

исправить следующим образом:

при выполнении процедуры Main() проверяются некоторые значения, при получении определенного результата форма загружается

Это в начале загрузки проекта.
А в случае с пимпочкой ИМХО Вы продолжаете упорно не хотеть понять разницу между формой(классом) и экземплярами этой формы. Правильный код в кнопке может создавать сколько угодно копий-экземпляров, каждый из которых будет создавать такое же неограниченное количество таких же экземпляров

Кидаем на форму кнопку, копируем этот код и смотрим на результат

Код: Выделить всё

Private Sub Command1_Click()

  Dim Copia As Form     'Объявляем переменную типа Form

  Set Copia = New Form1 'Создаем экземпляр класса Form1
    Load Copia          'Загружаем экземпляр
    Copia.Show          'Выводим на экран
  Set Copia = Nothing   'Уничтожаем ссылку на экземпляр формы (сам он остается в памяти)

End Sub

[Viper]

Код: Выделить всё

Private Sub Command1_Click()

  Dim Copia As Form     'Объявляем переменную типа Form

  Set Copia = New Form1 'Создаем экземпляр класса Form1
    Load Copia          'Загружаем экземпляр
    Copia.Show          'Выводим на экран
  Set Copia = Nothing   'Уничтожаем ссылку на экземпляр формы (сам он остается в памяти)

End Sub

После

Код: Выделить всё

Set Copia = Nothing

в памяти уже ничего не остается, вернее остается странный объект без явной ссылки на него.

[Хакер]

Viper
Остаётся. Load помещает ссылку на экземпляр формы в коллекцию Forms. Чтобы её и оттуда убрать, надо делать Unload. Иначе, этот экземпляр формы будет жить и после Set = Nothing.

[alibek]

Остается в Forms.
Если форма информационная и с ней работать больше не надо, то именно так лучше делать.

[Viper]

Хакер, я уточнил свой пост. Понятно, что форма останется висеть до вызова Unload.

[Хакер]

Viper
Где-же уточнил?

После выполнения

Код: Выделить всё

Set Copia = Nothing

остаётся висеть такой же нормальный и полноценный объект формы, какой бы висел, если бы было так:

Код: Выделить всё

Private Sub Command1_Click()

  Dim Copia As Form     'Объявляем переменную типа Form
  Dim Copia2 As Form

  Set Copia = New Form1 'Создаем экземпляр класса Form1
  Set Copia2 = Copia

    Load Copia          'Загружаем экземпляр
    Copia.Show          'Выводим на экран

  Set Copia = Nothing   'Уничтожаем ссылку на экземпляр формы (сам он остается в памяти)

End Sub

[Viper]

После

Код: Выделить всё

Set Copia = Nothing

в памяти уже ничего не остается, вернее остается странный объект без явной ссылки на него.

Так вот оно, уточненный вариант. Явной ссылки нет, однако форма вполне себе останется жить как на экране, так и в коллекции Forms.

[Хакер]

в памяти уже ничего не остается, вернее остается странный объект

Вот этим я не доводен.
Вернее действительно остаётся, только не странный объект, а вполне нормальный.

Что значит нет явной ссылки? Какие ссылки считать явными, а какие нет?

[alibek]

А что такое Forms, как не явная ссылка?
С циклическими ссылками еще можно придумать такую ситуацию, но здесь не тот случай.

[Viper]

Уговорили!
После

Код: Выделить всё

Set Copia = Nothing

форма остается на экране и в коллекции Forms. Любые последующие с ней манипуляции возможны только через Forms.