Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Базы";
Текущий архив: 2002.08.22;
Скачать: [xml.tar.bz2];

Вниз

ADO + SQL Server 2000, подстановочные поля   Найти похожие ветки 

 
falcon   (2002-07-30 11:20) [0]

День добрый !

Есть Windows NT Server 4.0 EE с установленной на нем БД SQL Server 2000 EE.
Клиент пишется на Delphi 6 и для доступа к БД используется ADO.
Есть четыре таблицы:
Detail - основная
Detail_Type, Liter, Format_Chert - справочные
В таблице Detail есть три числовых поля, информация в которые заносится из справочных таблиц:
Detail["Nom_Type"] <- Detail_Type["Nom_Type"]
Detail["Id_Litera"] <- Liter["Id"]
Detail["Id_Format_Chert"] <- Format_Chert["Id"]
В редакторе полей таблицы Detail создаю три новых подстановочных поля типа Lookup для отображения в DbGrid символьной информации из справочных таблиц.
Добавляю новую запись:
ADOConnection1.BeginTrans;
Detail.Append;
Detail_Type.First;
Detail["Nom_Type"] := Detail_Type["Nom_Type"];
Liter.First;
Detail["Id_Litera"] := Liter["Id"];
Format_Chert.First;
Detail["Id_Format_Chert"] := Format_Chert["Id"];
При операциях присваивания выдается следующее сообщение: "Ошибка неизвестного типа".
Если в редакторе полей оставить только одно подстановочное поле и изменить приведенный выше код на:
ADOConnection1.BeginTrans;
Detail.Append;
Detail_Type.First;
Detail["Nom_Type"] := Detail_Type["Nom_Type"];
то все проходит без ошибок. То есть проблема возникает при наличии вычисляемых полей больше одного.
Подскажите как можно обойти эту проблему. Заранее благодарен за ответ.


 
ЮЮ   (2002-07-31 03:35) [1]

Detail["Nom_Type"] ,по-моему, есть TField
Detail["Nom_Type"].Value := Detail_Type["Nom_Type"]].Value;



Страницы: 1 вся ветка

Форум: "Базы";
Текущий архив: 2002.08.22;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.007 c
3-71037
UnDISCOvery
2002-08-01 15:17
2002.08.22
Различные локальные платформы БД в аспекте безопасности ...


3-71003
edik
2002-07-31 14:49
2002.08.22
2 Вопроса по SQL


1-71210
Roman1985
2002-08-10 11:18
2002.08.22
Горячие клавиши


14-71377
Viewer
2002-07-26 15:47
2002.08.22
Насколько реален выпуск Pentium 5 до конца этого года.


6-71296
Vygantas
2002-06-08 16:05
2002.08.22
kak po imeni kompa uznat IP ??





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский