А как распознать событие если КУЧА форм???

[newonline]

Я имею ввиду, что если в приложении необходимо загружать множество форм по типу:

Dim FormData as FormData
Set Form Data = New FormData
Load Form Data

Использовав Load я уверен, что новая форма добавляется в набор Forms.

Если затем я произведу событие на любой из созданных таким образом форм (н-р DblClick), то как же узнать какой из экземпляров распознал событие. Ведь у набора Forms есть метод (или событие -не помню) Item, но где его найти??? [/b]

[alibek]

Как вариант -- различать их по hWnd.

[Amed]

Зачем, позвольте осведомиться, узнавать принадлежность события?

На примере будет лучше.

[Ennor]

...как же узнать какой из экземпляров распознал событие.

В каком именно месте твоей программы тебе требуется это знание? Опиши вкратце, ибо складывается у меня впечатление, что ты сам плохо себе представляешь, что именно тебе нужно.

[alibek]

В каком именно месте твоей программы тебе требуется это знание?

Скорее всего у него обработчик вынесен в модуль.
Если так, то можно передавать дополнительным аргументом Me.hWnd, а можно сразу Me.

[newonline]

Моя прога будет проектировать схемы дислокации дорожных знаков.
Для этого в качестве исходной информации в форму frmData на FlexGrid загружаются из файла данные - одна форма - одна таблица данных("Характерные точки", Данные плана трассы, Данные продольного профиля, Данные поперечного профиля, и т.д..., см. файл в кодировке DOS). Эти формы нет смысла и не удобно привязывать к конкретным таблицам, так как число исходных таблиц может меняться в зависимости от задачи проектирования, поэтому пользователь и загружает любое необходимое число исходных таблиц. Пользователь открывает - создает новый экземпляр - этой формы для редактирования и указывает (используя помещенный на форму ComboBox) какую именно таблицу он загрузил - т.е. дает ей имя.

Так как все созданные экземпляры формы имеют стандартное свойство Name = "frmData", то я специально добавл открытую переменную TableName в модуль формы, чтобы в дальнейшем эти таблицы можно было легко идентефицировать в ходе циклов обработки данных.

ТАК ВОТ, в момент, когда пользователь выбирает имя таблицы из списка и нажимает кнопку "Назначить имя" я должен узнать какому экземпляру формы назначить это имя (т.е. свойству TableName). Ну и естесственно выполнить все проверки, чтобы не было назначено двум экземплярам одинаковое имя...
Если что-то непонятно - я поясню

[GSerg]

Если что-то непонятно

Наоборот, всё понятно.
Книжек не читал, ООП не изучал.

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

private sub cmdApplyName_Click()
  me.tablename = cmbTableName.Text
end sub

Всё.

[tyomitch]

Вдобавок к коду GSerg: слово Me необязательно, без него эффект тот же.

[codemaster]

Я имею ввиду, что если в приложении необходимо загружать множество форм по типу:

Dim FormData as FormData
Set Form Data = New FormData
Load Form Data

Использовав Load я уверен, что новая форма добавляется в набор Forms.

Если затем я произведу событие на любой из созданных таким образом форм (н-р DblClick), то как же узнать какой из экземпляров распознал событие. Ведь у набора Forms есть метод (или событие -не помню) Item, но где его найти??? [/b]

у формы есть проперть "Tag"

[newonline]

Спасибо Всем, кто отозвался.
Простите неуча.
Пошел в библиотеку.