powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Где живут NewData & Response?
16 сообщений из 16, страница 1 из 1
Где живут NewData & Response?
    #32246499
Фотография Лифчик
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Hello everybody! (Привет каждому телу
)

Понедельник, вечер. Пора работать. Начал. Но аксесс подбрасывает мне загадки одну за другой, а мудрый Гетц о них, похоже, не подозревает.

Обычный обработчик события Not in List в Комбо:

Код: plaintext
Private Sub Combo_NotInList(NewData as String, Response as Integer)

меня перестал устраивать. Написал функцию

Код: plaintext
Public Function ComboNotInList(NewData as String, Response as Integer) as Boolean

и хочу вставлять во все комбобоксы на всех формах. Но как к ней правильно обратиться в строке описания события? Надо что-то вроде:
Not in List.....=ComboNotInList(NewData,Response) - но это неправильно, ибо NewData & Response - аксессовские глобальные переменные. А где они прописаны, т.е. как правильно к ним обратиться?

Заранее благодарен.
...
Рейтинг: 0 / 0
Где живут NewData & Response?
    #32246511
Фотография Лох Позорный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Не выйдет у тебя каменный цветок.
Не глобальные это переменные, а очень даже локальные. Их аксес передает в функцию-обработчик события. Но раз уж ты саму эту функцию не используешь - то и переменных ты не получишь.
Подарки сегодня только тем, кто хорошо кушал.
...
Рейтинг: 0 / 0
Где живут NewData & Response?
    #32246514
zz
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ну а в чем проблема-то? Параметры NewData&Response передаются в процедуру NotInList, оттуда вызывается твоя проца с этими же параметрами. И все.
...
Рейтинг: 0 / 0
Где живут NewData & Response?
    #32246519
Фотография Geo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
с этими же параметрами + ссылка на текущий комбобокс. :)
...
Рейтинг: 0 / 0
Где живут NewData & Response?
    #32246523
zz
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Логично, черт возьми :))
...
Рейтинг: 0 / 0
Где живут NewData & Response?
    #32246534
sasha_1
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
>Обычный обработчик события Not in List в Комбо:
>Private Sub Combo_NotInList(NewData as String, Response as Integer)
>меня перестал устраивать. Написал функцию
>Public Function ComboNotInList(NewData as String, Response as Integer) as
>Boolean

а чего собственно изменил-то?
параметры те же.
нафига свою функцию, писал бы в стандартную.
...
Рейтинг: 0 / 0
Где живут NewData & Response?
    #32246551
Фотография Лох Позорный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Скорее всего хочеца человеку написать функцию типа "Спросить и если да то добавить" и не плодить код в одинаковых комбобоксах.
Нормальная идея - использовать ровно один обработчик для кучи контролов. А не кучу обработчиков, которые выполняют обезьянью работу по вызову функции.
Только идея эта не для аксеса. К сожалению.
А как было бы хорошо... Я вот думаю как бы в VB один обработчик к событиям массива адошных рекордсетов прицепить... Но это я так, размечтался...
...
Рейтинг: 0 / 0
Где живут NewData & Response?
    #32246553
Фотография Лифчик
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Дело в том, что я хочу совсем отказаться от процедур NotInList. Сделал функцию, которая определяет, в каком комбо находимся, в какую таблицу и какое поле надо/не надо добавить запись. Соответственно, в форме хотелось бы иметь просто описание событие Not in List=ComboNotInList().
Ну NewData я нарою, а с Response что делать? Правильно ли моя понедельничная головушка поняла, что можно этому респонсу пофиг сделать?
...
Рейтинг: 0 / 0
Где живут NewData & Response?
    #32246557
Фотография Geo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А веселее, имхо, написать модуль класса с этим обработчиком, и, например, при открытии формы навешивать этот класс на все комбобоксы...
...
Рейтинг: 0 / 0
Где живут NewData & Response?
    #32246567
sasha_1
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
>в форме хотелось бы иметь просто описание событие Not in
>List=ComboNotInList().
а вот это фигушки.
вот здесь Ас своего не отдаст.
...
Рейтинг: 0 / 0
Где живут NewData & Response?
    #32246597
Фотография Лох Позорный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А веселее, имхо, написать модуль класса с этим обработчиком, и, например, при открытии формы навешивать этот класс на все комбобоксы...
И, помимо коллекции контролов, создавать в каждой форме еще и коллекцию классов-обработчиков событий этих контролов?
Разумеется так веселе. Упростим код до полной его нечитабельности .
Пусть потом кто-нибудь попробует разобраться - кто ж это у него всю работу выполняет? Данные какие-то куда-то добавляет...
Но в принципе работать будет. При большом количестве контролов (больше одного ) может даже и оправдано.
...
Рейтинг: 0 / 0
Где живут NewData & Response?
    #32246621
Фотография Лифчик
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Лох>Скорее всего хочеца человеку написать функцию типа "Спросить и если да то добавить" и не плодить код в одинаковых комбобоксах...
----

Угадал, провидец. Все эти процедуры до тошнотворности одинаковы. Более того, у меня и комбобоксы все устроены одинаково - 1я колонка - текстовые значения, 2- я - ID, ну еще пара опциональных колонок в зависимости от таблицы. Вот я и решил для повышения читаемости в модулях от одинакового кода избавиться.
...
Рейтинг: 0 / 0
Где живут NewData & Response?
    #32247039
Фотография Лифчик
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Доброе время суток!

Поднимая опять вчерашний вопрос, граждане, перед тем, как кидаться в новую для меня стихию написания собственного модуля класса вместо комбобокса, я хочу, чтобы мировая аксессовская общественность подтвердила, что:

Никоим образом, иначе как через манипулирование переменной Response в стандартной процедуре обработки события Not In List НЕВОЗМОЖНО избавиться от аксессовского сообщения "The text you entered isn't an item in the list".

Т.е. по поводу этого сообщения никакого варварского метода, типа отключения всех возможных сообщений, предупреждений и прочее, а также никаких ходов через задницы аксесса с подключением к филейным частям типа модулей глобальных переменных НЕ существует.

Если это действительно так, то мне кажется, данный факт надо занести в ФАК про отключение подтверждений/сообщений как исключение из правила.
...
Рейтинг: 0 / 0
Где живут NewData & Response?
    #32247054
sasha_1
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
у формы есть полезное событие Form_Error(DataErr As Integer, Response As Integer). Вызывается при любой ошибке, в том числе и при NotInList.
Параметры код ошибки и ответ. Избавиться от стандартной обработки можно здесь.
...
Рейтинг: 0 / 0
Где живут NewData & Response?
    #32247056
art_m
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
sasha_1 вернись, пожалуйста, сюда
...
Рейтинг: 0 / 0
Где живут NewData & Response?
    #32247206
Фотография Лифчик
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Выражаю Sasha_1 всяческую благодарность! Спасибо! То, что нужно! И не надо огород городить!
...
Рейтинг: 0 / 0
16 сообщений из 16, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Где живут NewData & Response?
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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