关于paradox编程,本人刚学delphi,很简单的

Question

我用tquery,tdbgrid,tdatasource三个组件连接数据库，下面有几个问题希望各位大虾解决一下,
先谢谢了!!!1 .我想将数据库中的部分数据取出做一些处理，然后在存入数据库，比如说date ,time ,money 这三种类型，怎样将某一个元组的这些类型的数据取出来，取出来后怎么存放操作2. 在进行数据库查询后结果显示在网格上,我想将网格中第一行的数据全部提取出来,该怎么做.

Answer 1

1.edit1.text := adoquery1.FieldByName('日期字段').asString;
  edit2.text :=Floattostr(adoquery1.FieldByName('money字段').asFloat);
2.with adoquery1 do
  begin
    first;
    showmessage(adoquery1.FieldByName('日期字段').asString);
       .
       .
       .
  end;

Answer 2

query1.Close;
  query1.SQL.Clear;
  query1.SQL.Add('insert into traveller.db');
  query1.SQL.Add('values(:num,:name,:sex,:date,:start,:end)');
  query1.Params[0].AsString
..........................
  query1.ExecSQL;
  query1.Active:=true;
  query1.Close;
  query1.SQL.Clear;
  query1.SQL.Add('insert into message.db');
  query1.SQL.Add('values(:num,:name,:sex,:getdate,:flight,:seat,:startdate,:starttime,:start,:end,:value)');
  query1.Params[0].AsString
  ................
    query1.ExecSQL;
  query1.Active:=true;
我连续进行两次数据库操作，
第一次操作成功，但是第二次就在运行时发生异常，尖头指向第二个query1.Active:=true，
数据库操作失败了，
这是为什么啊？试了很多次

Answer 3

把两个query1.Active:=true;都去掉
就行了
open是要返回结果集的

Answer 4

对啊
查询不用active;
给分