一个access数据库,包括num,name,age等字段,用ado连.
treeview显示全部name
要做的是:比如有个记录num=999,name=sa,那在输入999点查询后,treeview下的sa节点自动selected这是代码
Form1.ADOTable1.Active:=true;
if Form1.adotable1.Locate('num',edit1.text,[])=true then
begin
for i:=0 to Form1.treeview1.Items.Item[0].Count-1 do
if Form1.treeview1.Items.Item[0].Item[i].Text=form1.ADOTable1.FieldValues['name'] then
Form1.treeview1.Items.Item[0].Item[i].Selected:=true;
end
else
begin
showmessage('没有找到相应学号');
exit;
end;
Form1.ADOtable1.Active:=false ;这样查询会报错说 域name不存在
这是什么原因啊?
treeview显示全部name
要做的是:比如有个记录num=999,name=sa,那在输入999点查询后,treeview下的sa节点自动selected这是代码
Form1.ADOTable1.Active:=true;
if Form1.adotable1.Locate('num',edit1.text,[])=true then
begin
for i:=0 to Form1.treeview1.Items.Item[0].Count-1 do
if Form1.treeview1.Items.Item[0].Item[i].Text=form1.ADOTable1.FieldValues['name'] then
Form1.treeview1.Items.Item[0].Item[i].Selected:=true;
end
else
begin
showmessage('没有找到相应学号');
exit;
end;
Form1.ADOtable1.Active:=false ;这样查询会报错说 域name不存在
这是什么原因啊?
解决方案 »
- 如何自动生成Button控件?
- 关于正则表达式的写法
- qreport打印如何设置行间距,freport在打印一个大文本
- 请问出现:Illegal character in input file:($A1A1)属于什么错误?
- 数据库的一个问题?
- TDateTime 变量能做循环吗?
- 怎样检索到符合两个日期之间的数据,即日期类型比较的问题
- 有这种事
- 如何安装TGIFIMAGE控件?
- 请教兄弟们一个有关SQL的问题!(50分)
- '故国' VS 'FS'决斗! (请大家来评一评,天下不乱我心不安,今天特爽)
- 紧急提问:组件安装好以后,我把组件所在目录重命名再打开DELPHI时问是否LOAD几个BPL我选NO.然后再把目录改回原来的,再重启DELPHI时已经找
treeview1.Items.Count - 1
form1.ADOTable1.FieldValues['name']
//为
form1.ADOTable1.FieldByName['name'].asstring
access认为name 是系统的关键字 需要加[]
都是不行的!@