我在窗体上放了5个控件,分别是
TAdoConnection
TAdoQuery
TDataSource
TDbgrid
TButton
设置连接本地Access2000数据库,测试连接OK。我现在想要做的是:
点击TButton,用TAdoquery取出某个表当中的一个字段值,代码如下:数据表:pt_mstr
字段:pt_part、...procedure TForm1.Button1Click(Sender: TObject);
var
mystring:string;
begin
mypass:=ADOQuery1.fieldbyname('pt_part').AsString;
showmessage(mystring);
end;为什么点击按钮之后出现如下错误提示:
"ADOQuery1:Field 'pt_part' not found"
TAdoConnection
TAdoQuery
TDataSource
TDbgrid
TButton
设置连接本地Access2000数据库,测试连接OK。我现在想要做的是:
点击TButton,用TAdoquery取出某个表当中的一个字段值,代码如下:数据表:pt_mstr
字段:pt_part、...procedure TForm1.Button1Click(Sender: TObject);
var
mystring:string;
begin
mypass:=ADOQuery1.fieldbyname('pt_part').AsString;
showmessage(mystring);
end;为什么点击按钮之后出现如下错误提示:
"ADOQuery1:Field 'pt_part' not found"
解决方案 »
- 关于UniDAC这套数据库访问控件的
- delphi case语句似乎不能够使用break跳出?快速赋值二维数组
- 程序员,你上班的时候可以上网吗?(送分贴)
- 请问一个十分棘手的简单问题,'#$D#$A'是什么东西啊,该如何替换成'<br>'呢???
- 无窗口的对象如何得到其父对象的消息
- 怎样在fastreport中打印窗体界面?
- 怎样用最简单的方法实现邮件的群发??
- 关于格式化字符串的问题?(如:142,463,635.98元)
- 大家谈一下开发多层分布体系的经验吧,来者有分,另有高分相赠
- 请问,怎样才能在delphi中做出xp的效果呢! 高分送上
- TreeView的小问题?
- 请问如何在edit框中定位光标位置呢?
AdoQuery1.SQL.Text:='select * from 表名';
ADOQuery1.Open;将上两句加在
mypass:=ADOQuery1.fieldbyname('pt_part').AsString;
的前面
var
mystring:string;
begin
with ADOQuery1 do
begin
Close;
SQL.Clear;
mypass:=ADOQuery1.fieldbyname('pt_part').AsString;
Open;
showmessage(mystring);
end;
end;