![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Использование IBDataSet
Игорь С. © (2003-03-19 16:28:00)Помогите пожалуйста с такой проблемой.
Когда я добавляю запись в выбранный набор данных,
IBDataSet1.AppendRecord([ComboBox1.ItemIndex, null, 2, XPEdit1.Text, XPEdit2.Text, OnSession, 0]);
IBDataSet1.ApplyUpdates;
Form1.IBTransaction1.Commit;
IBDataSet1.Active:=True;
IBDataSet1.First;
IBDataSet1.FetchAll;
То запись нормально добавляется, но когда в событии
IBDataSet.afterScoll
ставлю Label1.Caption:=IBDataSet1.FieldValues["BaseEducation"];
чтобы отслеживать значения столбца при перемещении, появляется ошибка (Invalide Variant Type Conversion). Появляется она после ApplyUpdates
Тип BaseEducation - Integer
Соловьев (2003-03-19 16:54:00) [1]Лучше:
If not IBDataSet1.FieldByName("BaseEducation").AsNull
Then
Label1.Caption:=IBDataSet1.FieldByName("BaseEducation").AsString;
Игорь С. (2003-03-19 16:51:00) [2]Спасибо, я исправил (точнее обошёл)
Поставил проверку
If IBDataSet1.FieldByName("BaseEducation").AsString<>"" Then
Label1.Caption:=IBDataSet1.FieldValues["BaseEducation"];
Тип BaseEducation - Integer
Соловьев (2003-03-19 16:47:00) [3]
> Появляется она после ApplyUpdates
???
А какой тип у "BaseEducation"
Игорь С. (2003-03-19 16:34:00) [4]Попробовал, появилась ошибка (Variant does not reference an automation object)
Соловьев (2003-03-19 16:30:00) [5]Label1.Caption:=IBDataSet1.FieldByName("BaseEducation").AsString;