关于Query控件？

Question

请大家帮我解决一下
我用下面的代码有时运行没有问题，而有时总是提示没有这个字段。
我看看为什么我下面的代码有的时候运行时没有问题，而有的时候它总是提示没有这个字段。
procedure TXaoFeiForm.Button2Click(Sender: TObject);
Var
  Query: Tquery;
begin
  Query := Tquery.Create(nil);
  Query.DatabaseName := DBName;
  Query.SQL.Add('select * from CardInfo where CardH =: CardH');
  Query.ParamByName('CardH').AsString := Copy(CardHEdit.Text,2,Length(CardFirst)+CardHLength);
  Query.Open;
  Edit1.Text := Query.FieldByNam（'CardB').AsString;
End;
这是我写语句的问题呀？还是什么问题呢请大家帮我看看， 谢谢！！

Answer 1

CardB是你的表中的字段吗？要是你确认是，还要保证连接数据库正确。还有，要是你的查询返回空表的时候，要判断后加以处理

Answer 2

你是要往这个表里添加记录还是修改记录，若是修改，就得指明是update操作 若是添加就得指明是insert操作

Answer 3

你把sql语句给写出来，然后在数据库里面查询看看是什么问题？

Answer 4

SQL语句调用Query1.Close;
Query1.SQL.Clear;
Query1.SQL.Add('.....');
Query1.Open;

Answer 5

请问，SQL语句
Query.slq.Add('select * from cardInfo where CardH =:CardH');
和
Query.sql.Add('Select * from CardInfo where CardH =: CardH');
有区别吗？

Answer 6

是不是这个问题：Query.ParamByName('CardH').values:= Copy(CardHEdit.Text,2,Length(CardFirst)+CardHLength);