求一个用sql2000和 delphi 7.0开发的具有查询 删除 添加 功能的 小程序 如题简单一点的 我是一个初学者 自学的 但是看网上的都是很长的代码 我看不懂 本人学过 C 语言和JAVA 简单的程序看的懂 请高手帮忙下 写个简单的代码 告诉下用什么组件 谢谢了 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 ADO组件,adoquery,adoconnection,datasource,dbgrid就可以初步显示出数据来自己看看吧,例子很多的,lz没仔细找过 www.2ccc.com看什么简单就取什么。 这里直接写把给段简单的代码你~用到adoquery \dbgrid \datasource这三个控件 再添加个要查询或添加的内容的edit等控件组查询: 过滤查询-过滤查询的前提是你的adoquery的sql已经存在,只不过是对查询出来的结果进行挑选过滤 adoquery1.filtered:=false; adoquery1.filter:='字段 like '+''''+'%'+edit1.text+'%'+''''; adoquery1.filtered:=true; sql查询-直接对数据库使用sql查询 adoquery1.close; adoquery1.sql.clear; adoquery1.sql.add('select * from 表'+ ' where 字段 like '+''''+'%'+edit1.text+'%'+''''); adoquery1.open; // 或adoquery1.execsql OPEN有返回的查询 execsql不返回~添加 adoquery1.append; adoquery1.fieldbyname('字段1').asstring:=trim(edit1.text); adoquery1.fieldbyname('字段2').asstring:=trim(edit2.text); . . . adoquery1.fieldbyname('字段n').asstring:=trim(editn.text); //随便你要添加什么字段 adouqery1.post; sql方式的添加我就不说了.既然你有C基础.应该SQL添加代码应该也知道 和查询差不多.. 都是套用adoquery1.close; adoquery1.sql.clear; adoquery1.sql.add(''); adoquery1.sql.open;修改 adoquery1.edit; adoquery1.fieldbyname('字段1').asstring:=trim(edit1.text); adoquery1.fieldbyname('字段2').asstring:=trim(edit2.text); . . . adoquery1.fieldbyname('字段n').asstring:=trim(editn.text); adouqery1.post;删除 adoquery1.sql.add('delect * from where 字段1= '+''''+adoquery1[字段1]+''''); adoquery1.execsql;没开delphi所以没检察是否有漏写或错写代码..大概意思是这样.希望能对你有所帮助~ Delphi里的Demo看下,里面有你要的东西 你去www.2ccc.com或者www.delphifans.com 怎样把DBchart1图表导出到fastreport里打印????高手进,在线急等之.... delphi 挂access 显示不了小数点后面数值。 一个关于datetime的问题 请教高手 在线等待 在线求解一些小问题 如何知道treeview中所有节点总数? 窗体上有n个Edit,如何通过消息处理的方法实现下面的效果,单击某一Edit,使它的背景色变为黄色? ***这是为什么?***//* 第十期的程序员出了吗? 字符判断问题,帮帮我呀 delphi中treeview控件的使用问题 字附串替换问题?
自己看看吧,例子很多的,lz没仔细找过
用到adoquery \dbgrid \datasource这三个控件 再添加个要查询或添加的内容的edit等控件组查询:
过滤查询-过滤查询的前提是你的adoquery的sql已经存在,只不过是对查询出来的结果进行挑选过滤
adoquery1.filtered:=false;
adoquery1.filter:='字段 like '+''''+'%'+edit1.text+'%'+'''';
adoquery1.filtered:=true;
sql查询-直接对数据库使用sql查询
adoquery1.close;
adoquery1.sql.clear;
adoquery1.sql.add('select * from 表'+
' where 字段 like '+''''+'%'+edit1.text+'%'+'''');
adoquery1.open; // 或adoquery1.execsql OPEN有返回的查询 execsql不返回~添加 adoquery1.append;
adoquery1.fieldbyname('字段1').asstring:=trim(edit1.text);
adoquery1.fieldbyname('字段2').asstring:=trim(edit2.text);
.
.
.
adoquery1.fieldbyname('字段n').asstring:=trim(editn.text); //随便你要添加什么字段
adouqery1.post;
sql方式的添加我就不说了.既然你有C基础.应该SQL添加代码应该也知道 和查询差不多..
都是套用adoquery1.close;
adoquery1.sql.clear;
adoquery1.sql.add('');
adoquery1.sql.open;修改 adoquery1.edit;
adoquery1.fieldbyname('字段1').asstring:=trim(edit1.text);
adoquery1.fieldbyname('字段2').asstring:=trim(edit2.text);
.
.
.
adoquery1.fieldbyname('字段n').asstring:=trim(editn.text);
adouqery1.post;删除 adoquery1.sql.add('delect * from where 字段1= '+''''+adoquery1[字段1]+'''');
adoquery1.execsql;没开delphi所以没检察是否有漏写或错写代码..大概意思是这样.希望能对你有所帮助~