как исправить ошибку

[obsession]

if combobox1.ItemIndex=0 then begin
table1.Active:=true;
dbtext1.DataSource:=DataSource1;
dbtext2.DataSource:=DataSource1;
dbtext3.DataSource:=DataSource1;
dbtext4.DataSource:=DataSource1;
dbtext5.DataSource:=DataSource1;
dbtext6.DataSource:=DataSource1;
table1.RecNo:=1;
dbtext1.DataField:=Table1.FieldByName('VoprosA1').AsString;
table1.RecNo:=2;
dbtext2.DataField:=Table1.FieldByName('VoprosA1').AsString;
table1.RecNo:=3;
dbtext3.DataField:=Table1.FieldByName('VoprosA1').AsString;
table1.RecNo:=4;
dbtext4.DataField:=Table1.FieldByName('VoprosA1').AsString;
table1.RecNo:=5;
dbtext5.DataField:=Table1.FieldByName('VoprosA1').AsString;
table1.RecNo:=6;
dbtext6.DataField:=Table1.FieldByName('VoprosA1').AsString;
end;

project raised exception class EDatabaseError with message 'Dbtext1:field 'тут текст одного поля базы...' not found'. process stoped. use step or run to continue

подскажите пожалуйста как исправить ошибку. что-то дописать может быть... или убрать...

[3D Hunter]

Говорит, что такого поля "VoprosA1" в БД не существует. Внимательно просмотрите таблицу еще раз.