FieldByName 问题

Question

curid:=Trim(FieldByName('a').AsString);
我找遍整个数据库，也没看见A这个字段啊！
这个a 是什么意思呢？不想麻烦各位大牛，真是不知道，什么意思

Answer 1

procedure TBook.AddChildNodes(NodeName: string; SQLstr: string; ImlID: Integer);
var
  CurID,SubNodename:string;
  SubNode,SubNodeChild:TTreeNode;
begin
  subnode:=Tree.Items.AddChild(Tree.TopItem,NodeName);
  subnode.ImageIndex:=ImlID;
  with TDMMain1.ADOQuery1 DO
  begin
    close;
    SQL.Clear;
    SQL.Add(SQLstr);
    Open;
    First;
    while not Eof do
    begin
      curid:=Trim(FieldByName('a').AsString);
      subnodename:=CurID;
      subnodename:=CurID;
      subnodechild:=Tree.Items.AddChild(SubNode,SubNodename);
      SubNodeChild.ImageIndex:=2;
      Next;    end;
  end;
end;

Answer 2

TDMMain1.ADOQuery1.FieldByName('a')
  他是说你这个数据集的字段a

Answer 3

表中没有a 吗? 那也许是别名来的
比如:select 字段1 as a,字段2 as b ...查看一下你的SQLstr值是什么就清楚了

Answer 4

楼上正解，看看SQL语句有没有as a

Answer 5

a就是字段名，但是他可能是别名也就是说你的查询语句里写着 select test as a from....
此时adoquery里就可以用a代替test了

Answer 6

在SQL语句中重命名了，查SQL吧

Answer 7

1.查看数据表结构，是否有A字段
2.查看你的SQL语句代码，是否有别名存在
3.是否用了存储过程？

Answer 8

select * from mybook

Answer 9

双击ADOQuery1,如果没猜错,a就在里面,那是手动添加的计算字段
再双击onCalcFields事件,a的赋值也在这里,,,,去瞧瞧有没有

Answer 10

http://download.csdn.net/detail/changsn/3828022

Answer 11

刘艺的 DELPHI面向对象的编程思想的代码
http://download.csdn.net/detail/changsn/3828022
帮我看看吧

Answer 12

  RootNode.ImageIndex:=1;
  strQry:='select distinct 出版社 as a from mybook ';
  AddChildNodes('出版社',strQry,3);
  strQry:='select distinct 印次 as a from mybook ';
  AddChildNodes('印次',strQry,4);
  strQry:='select distinct 类别 as a from mybook ';
  AddChildNodes('类别',strQry,5);
  strQry:='select distinct 出版时间 as a from mybook ';
  AddChildNodes('出版时间',strQry,6);
 strQry都有a