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

Eval("forms!Форма28!Поле325.Value")
Eval("forms!Форма28!Поле325.BackColor")
Eval("forms!Форма28!Поле325.Top + 8")
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
07.07.2003, 17:32
    #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
| Ответить | Цитировать | Написать  
07.07.2003, 17:41
    #32201253
Нуф-нуф
Нуф-нуф
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Объектная ссылка
Не совсем по вопросу, но может и пригодится (сам в свое время с этой задачей сталкивался)...

Обычно бывает удобно хранить и манипулировать резделенными на составляющие именами объектов, например в указанном случае код преобразуется к следующему:
dim ctl as control
dim strFormName as string
dim strControlName as string
strFormName="Форма28"
strControlName="Поле325"
set ctl=Forms(FormName).(strControlName)
По данной схеме, в случае чего, можно безпроблемно отследить и откорректировать (переименовать например) отдельно мух и котлеты...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
07.07.2003, 17:43
    #32201256
Нуф-нуф
Нуф-нуф
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Объектная ссылка
аж на 9 минут...
...АпАздАл (с) Лох Позорный :)
это мой рекорд
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
07.07.2003, 17:55
    #32201268
wara
wara
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Объектная ссылка
Всем спасибо, у самого получилось так, как предлжил АлексейК.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Объектная ссылка / 7 сообщений из 7, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 869ms
Закрыть
start [/forum/search_topic.php?author=new_dosemi&author_mode=last_posts&do_search=1]:
 0ms
get settings:
 8ms
get forum list:
 15ms
get settings:
 8ms
get forum list:
 15ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 56ms
get topic data:
 8ms
get forum data:
 2ms
get page messages:
 35ms
get tp. blocked users:
 1ms
others: 715ms
total:  869ms
x
x
Закрыть


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