powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Объектная ссылка
7 сообщений из 7, страница 1 из 1
Объектная ссылка
    #32201217
Фотография wara
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Есть ли функция, возвращающая по строке объекта ссылку на этот объект.
Пример:
dim ctl as control
dim strName as string
strName="forms!Форма28!Поле325"
set ctl=ЭтаФункция(strName)
...
Рейтинг: 0 / 0
Объектная ссылка
    #32201218
Фотография wara
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
И если есть, то как она называется.
...
Рейтинг: 0 / 0
Объектная ссылка
    #32201223
Фотография Владимир Саныч
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Модератор форума
Ссылку - не уверен. Но есть функция Eval, которая может вернуть значение свойства объекта:

Eval("forms!Форма28!Поле325.Value")
Eval("forms!Форма28!Поле325.BackColor")
Eval("forms!Форма28!Поле325.Top + 8")
...
Рейтинг: 0 / 0
Объектная ссылка
    #32201242
Фотография АлексейК
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
возможно это не совсем что желаешь услышать ...

два варианта установки связи с загруженными объектами.
1. forms!Форма28!Поле325
2 forms("Форма28").controls("Поле325")


соответственно во втором случае

dim ctl as control
dim frm as form

strForm="Форма28"
set frm=forms(strName)
strCtl = "Поле325"
strCtl=frm.controls(strCtl )
...
Рейтинг: 0 / 0
Объектная ссылка
    #32201253
Фотография Нуф-нуф
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Не совсем по вопросу, но может и пригодится (сам в свое время с этой задачей сталкивался)...

Обычно бывает удобно хранить и манипулировать резделенными на составляющие именами объектов, например в указанном случае код преобразуется к следующему:
dim ctl as control
dim strFormName as string
dim strControlName as string
strFormName="Форма28"
strControlName="Поле325"
set ctl=Forms(FormName).(strControlName)
По данной схеме, в случае чего, можно безпроблемно отследить и откорректировать (переименовать например) отдельно мух и котлеты...
...
Рейтинг: 0 / 0
Объектная ссылка
    #32201256
Фотография Нуф-нуф
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
аж на 9 минут...
...АпАздАл (с) Лох Позорный :)
это мой рекорд
...
Рейтинг: 0 / 0
Объектная ссылка
    #32201268
Фотография wara
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Всем спасибо, у самого получилось так, как предлжил АлексейК.
...
Рейтинг: 0 / 0
7 сообщений из 7, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Объектная ссылка
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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