Как генерировать событие Update из формы?

@Sp1der · Регистрация: 05.07.2007

Студворк — интернет-сервис помощи студентам

Привет.
У меня есть библиотека, в ней один класс MyClass и форма MyForm. В классе есть функция ShowForm ,которая показывает форму, и событие Update, которое должно возникать после нажатия кнопки 'применить' на форме. Так вот, сейчас событие Update я генерирую из класса после закрытия формы проверяя переменную Upd в форме
if myForm.Upd hten
RaiseEvent Update
end if
Но это не удобно т.к. событие возникает после закрытия формы, а не после нажатия конопки 'Применить'.
Вопрос:
Как генерировать событие Update из формы?

@Yoryk · 29.08.2007, 16:09

А почему не ипользуешь события самой кнопки?

@Sp1der · 29.08.2007, 16:20 **[ТС]**

А, я и спрашиваю какой код нужно прописать в событие кнопки Button_Click, чтобы сгенерировать событие Update в классе MyClass.

@Konst_one · 29.08.2007, 18:43

Я не знаю зачем тебе это надо, но это можно организовать примерно так:

'Form module
private mycls as MyClass
friend property Let ThisClass(cls as MyClass)
set mycls=cls
end property
Private Sub Command1_Click()
mycls.UpdateFire
End Sub

'=====================
'Class module MyClass
friend sub UpdateFire()
RaiseEvent Update()
end sub

private sub Class_Initialize()
MyForm.ThisClass=Me
end sub

==========
Удачи

Новые блоги и статьи Все статьи Все блоги /
Модель ЗдрввоСохранения 7: больше работников, больше ресурсов. anaschu 08.04.2026 работников и заданий может быть сколько угодно, но настроено всё так, что используется пока что только 20%	Дальние перспективы сервера - слоя сети с космологическим дизайном интефейса карты и логики. Hrethgir 07.04.2026 Дальнейшее ближайшее планирование вывело к размышлениям над дальними перспективами. И вот тут может быть даже будут нужны оценки специалистов, так как в дальних перспективах всё может очень сильно. . .	Горе от ума kumehtar 07.04.2026 Эта мне ментальная установка, что вот прямо сейчас, мол, мне для полного счастья не хватает (нужное вписать), и когда я этого достигну - тогда и полный кайф. Одна из самых сильных ловушек на пути. . . .	Использование значений реквизитов справочника в документе, с определенными условиями и правами Maks 07.04.2026 1. Контроль срока действия договора Алгоритм из решения ниже реализован на примере нетипового документа "ЗаявкаНаРаботу", разработанного в конфигурации КА2. Задача: уведомлять пользователя, если. . .
Доступность команды формы по условию Maks 07.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: сделать доступной кнопку (команда формы "ЗавершитьСписание") при. . .	Уведомление о неверно выбранном значении справочника Maks 06.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "НарядПутевка", разработанного в конфигурации КА2. Задача: уведомлять пользователя, если в документе выбран неверный склад. . .	Установка Qt Creator для C и C++: ставим среду, CMake и MinGW без фреймворка Qt 8Observer8 05.04.2026 Среду разработки Qt Creator можно установить без фреймворка Qt. Есть отдельный репозиторий для этой среды: https:/ / github. com/ qt-creator/ qt-creator, где можно скачать установщик, на вкладке Releases:. . .	AkelPad-скрипты, структуры, и немного лирики.. testuser2 05.04.2026 Такая программа, как AkelPad существует уже давно, и также давно существуют скрипты под нее. Тем не менее, прога живет, периодически что-то не спеша дополняется, улучшается. Что меня в первую очередь. . .

@Sp1der 0 / 0 / 0 Регистрация: 05.07.2007 Сообщений: 110

	Как генерировать событие Update из формы? 29.08.2007, 13:04. Показов 879. Ответов 3 Метки нет (Все метки) Привет. У меня есть библиотека, в ней один класс MyClass и форма MyForm. В классе есть функция ShowForm ,которая показывает форму, и событие Update, которое должно возникать после нажатия кнопки 'применить' на форме. Так вот, сейчас событие Update я генерирую из класса после закрытия формы проверяя переменную Upd в форме if myForm.Upd hten RaiseEvent Update end if Но это не удобно т.к. событие возникает после закрытия формы, а не после нажатия конопки 'Применить'. Вопрос: Как генерировать событие Update из формы? 0

@Yoryk 0 / 0 / 0 Регистрация: 29.08.2007 Сообщений: 6
	29.08.2007, 16:09
	А почему не ипользуешь события самой кнопки? 0

@Sp1der 0 / 0 / 0 Регистрация: 05.07.2007 Сообщений: 110
	29.08.2007, 16:20 [ТС]
	А, я и спрашиваю какой код нужно прописать в событие кнопки Button_Click, чтобы сгенерировать событие Update в классе MyClass. 0

@Konst_one 2 / 2 / 1 Регистрация: 19.07.2007 Сообщений: 737
	29.08.2007, 18:43
	Я не знаю зачем тебе это надо, но это можно организовать примерно так: 'Form module private mycls as MyClass friend property Let ThisClass(cls as MyClass) set mycls=cls end property Private Sub Command1_Click() mycls.UpdateFire End Sub '===================== 'Class module MyClass friend sub UpdateFire() RaiseEvent Update() end sub private sub Class_Initialize() MyForm.ThisClass=Me end sub ========== Удачи 0

Опции темы