Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Сохранение данных их ComboBox в Access [D6, Access]


diabolik_krsk ©   (2004-11-05 10:24:00) 

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

Существует форма для занесения данных в базу 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??


Johnmen   (2004-11-05 10:36:00) [1]

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


Sergey13   (2004-11-05 10:35:00) [2]

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


Наверх

Титульная страница Поиск, карта сайта Написать письмо