用的是access数据库gh代表的是里面的一个字段:工号
是不是象lable1.caption:=table1.filebyname('gh').asstring

解决方案 »

  1.   

    没错啊,选设置下Table1的DataBase跟TableName,然后Open
      

  2.   

    在 afterscroll事件中加入下列 代码
    lable1.caption:=table1.filebyname('gh').asstring
      

  3.   

    那如果我是想用treeview把他显示出来该怎么弄才好啊
    是不是
    var 
    mynode:ttreenode;
    begin
    repeat
    mynode:=treeview1.items.add(treeview1.selected,adotable1.fieldbyname('gh').asstring);
    treeview1.items.addchild(mynode,adotable1.fieldbyname('xm').asstring);
    treeview1.items.addchid(mynode,adotable1.fieldbyname('xb').asstring);
    adotable.next;
    until adotable1.eof;
      

  4.   

    应该是可以的 
    不过我觉得还是用while not adotable1.eof do 比较好一点。ds是一个datasource控件。if ds.dataset.recordcount > 0 then
    begin
      ds.dataset.first;
      while not ds.dataset.eof do
      begin
        mynode:=treeview1.items.add(nil,ds.dataset.fieldbyname ('gh').asstring);
        treeview1.items.addchild(mynode,ds.dataset.fieldbyname('xm').asstring);
        treeview1.items.addchid(mynode,ds.dataset.fieldbyname('xb').asstring);
        ds.dataset.next;
      end;
    end;