аксесс.
при выборе элемента списка, в другое поле вставляется соответвующий ему текст. в частности например выбираем диагноз - в окошко рекомендаций автоматически заносится лечение.
сделано это процедурой
"Private Sub DIAGNOS_AfterUpdate()
If Not IsNull(DIAGNOS) Then
REKOMEND = DIAGNOS.Column(1, DIAGNOS.ListIndex)
Else
REKOMEND = Null
End If
End Sub"
вот только в поле recomend заносятся только первые 5 строк соответсвующего текста. в чём причина? как заставить его писать все строки?
да, если в это же поле после автовставки дописать отрезанное, то всё нормально сохраняется.
а без этой фишки со списком я не знаю как ещё сделать такую подстановку..
при выборе элемента списка, в другое поле вставляется соответвующий ему текст. в частности например выбираем диагноз - в окошко рекомендаций автоматически заносится лечение.
сделано это процедурой
"Private Sub DIAGNOS_AfterUpdate()
If Not IsNull(DIAGNOS) Then
REKOMEND = DIAGNOS.Column(1, DIAGNOS.ListIndex)
Else
REKOMEND = Null
End If
End Sub"
вот только в поле recomend заносятся только первые 5 строк соответсвующего текста. в чём причина? как заставить его писать все строки?
да, если в это же поле после автовставки дописать отрезанное, то всё нормально сохраняется.
а без этой фишки со списком я не знаю как ещё сделать такую подстановку..
аксес! бейсик! REKOMEND!
сделайте меня развидеть это
это что то значит? или просто такие эмоции?
в любом случае не понял ответа. хорошо бы по существу..
в общем я предполагаю что это связано с ограничением на поля списка, в отдичие от остальных элементов они похож не несут в себе все строки MEMO, и потому при вставке через выбор пункта списка "лишнее" обрезается.
есть ли такое ограничение? как его обходить? - надо вставлять ооочень большой фрагмент текста автоматом, который тока MEMO поддерживает.
если нечего сказать по существу вопроса лучше вообще пойти и отписаться в другой теме, имхо.
чисто пожелание.
да и правилами подобное флудерство вроде запрещено.
Полностью согласен с предыдущим оратором.
механика следующая -
Вся работа - в программе обработки события "После обновления" (AfterUpdate) поля со списком diagnoz. Комментарии - в тексте программы.
Благодаря наличию поля "код" типа "счётчик" в таблице vizit, после выбора пользователем диагноза, в таблице vizit MS Access создаёт новую запись и ей присваивает очередной номер. Этот номер запоминается в глобальной переменной kod_modul (она объявлена на закладке "Модули" в Module1). Так же, в поле diagnoz_No таблицы vizit заносится номер выбранного диагноза. Однако, новая запись в таблице ещё не создана и в поле diagnoz_No таблицы vizit отсутствует выбранный пользователем номер диагноза. Поэтому далее запись принудительно сохраняется и с помощью запроса на обновление производится заполнение поля lecheniye таблицы vizit (копируется текст из таблицы diagnoz). Чтобы изменения в таблице (появление текста в поле lecheniye таблицы vizit) отобразились но форме, обновляются данные формы (Requery). При этом курсор устанавливается на первую запись. Чтобы вернуться к только что создаванной (или отредактированной) записи, выполняется переход к записи номер kod_modul. (с) Михайло_
здесь все мои вопросы можно закрыть - ибо бесполезно. видимо надо менять место где стоит консультироваться =)