Вниз
Скачать: CL | DM;

Сохранение данных их ComboBox в Access   Найти похожие ветки 

 
diabolik_krsk   (2004-11-05 10:24) [0]

Мастера помогите решить проблему.

Существует форма для занесения данных в базу sccess. На форме так же существует Combobox с занесенными на этапе проектирования программы Items. Всего 7 штук:
1. Октябрьский
2. Железнодорожный
3. Центральный
4. Советский
5. Ленинский
6. Кировский
7. Свердловский.

При занесении в базу хочу определить что в данном мементе отображается в Combobox и для этого Items занести соответствующее значение (работаю через ADOQuery):


ADOQuery.Insert;
case Combobox.text of
"Октябрьский": ADOQuery.FieldByName("raion").AsString := "okt"
"Железнодорожный": ADOQuery.FieldByName("raion").AsString := "zd"
"Центральный": ADOQuery.FieldByName("raion").AsString := "tsn"
"Советский": ADOQuery.FieldByName("raion").AsString := "sov"
"Ленинский": ADOQuery.FieldByName("raion").AsString := "len"
"Кировский": ADOQuery.FieldByName("raion").AsString := "kir"
"Свердловский": ADOQuery.FieldByName("raion").AsString := "svr"
end;
ADOQuery.Post;


Однако компилятор пишет какую-то ошибку Ordinal ...
Не могу понять в чем проблема, может что то не так с case??


 
Sergey13 ©   (2004-11-05 10:35) [1]

А F1 не работает? Там же ясно написано
where selectorExpression is any expression of an ordinal type (string types are invalid)
Да и вообще странная задача для программы - внести в базу то, что было внесено при проектировании.


 
Johnmen ©   (2004-11-05 10:36) [2]

case+F1 об типе данных в нём.



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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.023 c
1-1100893337
cezar
2004-11-19 22:42
2004.12.05
Хранение настроек в XML


1-1101200069
main
2004-11-23 11:54
2004.12.05
файловая система и TREEVIEW


8-1094119325
Hman
2004-09-02 14:02
2004.12.05
Громкость в WinAmp е


14-1100688607
_none_
2004-11-17 13:50
2004.12.05
подскажите, пожалуйста, компоненты для работы с...


1-1100683669
OlegM
2004-11-17 12:27
2004.12.05
Как после вставки таблиыцы в ворде выйти из таблицы




   Наверх