Сохранение данных их 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)
Да и вообще странная задача для программы - внести в базу то, что было внесено при проектировании.

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

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