我需要实现数据库查询的源代码!(100分)

  • 主题发起人 主题发起人 sailor_zh
  • 开始时间 开始时间
S

sailor_zh

Unregistered / Unconfirmed
GUEST, unregistred user!
请不要见笑,我是个新手!!!
我发现用DBGIRD显示查询出的结果不太适合我的需求,我的意思是用TEDIT或TDBEDIT显示每个字段的方式
来显示我查询出的结果,另外,如果我在一个EDIT里输入查询字段的值,点击查询按钮后又在它
的TEXT值里显示该字段的查询结果!
 
那只需要将查询出来的结果赋值给edit不就行了?
 
TDBEdit设置好datafield和datasource属性就可以自动感知了,
然后放一个navigator就可以了。
查询的话用Query,查查帮助就好。
 
你所讲的所有要求都可以通过控件间的设置完成。
不清楚可以加我的QQ:18283251
验证:programmer
 
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if key = #13 then
begin
key := #0;
query1.close;
query1.sql.clear;
query1.sql.add('select * from goods where goodsid = :Pa_goodsid');
query1.parambyname('Pa_goodsid').asstring := edit1.text;
query1.open;
if not query1.eof then //如果找到了
begin
edit1.text = query1.filedbyname('goodsid').asstring;
end;
end;
end;
 
不管是用什么来显示query中的数据,都是可以的,只需要自己在程序中指定
tedit显示的数据就行了。
类似的讨论类坛里很多,可以查查看,或者自己看看书也有的。
要讨论的话,加我吧,我晚上一般都在。qq:53320295
 
接受答案了.
 
后退
顶部