但你必须先连上数据源,然后再执行insert / append操作;
举个ado的例子
with adoquery1 do
begin
active:=True;
append;
Fieldvalue['bh'].value=edit1.text;
post;
end;
举个ado的例子
with adoquery1 do
begin
active:=True;
append;
Fieldvalue['bh'].value=edit1.text;
post;
end;
解决方案 »
- 动态创建Progressbar的问题
- 关于添加函数的小问题,急!!无法进行相应的操作
- 控制子窗体,在子窗体关闭是释放自己
- 简单的文本显示问题,解决结帖
- 简历式报表如何实现?用quickreport或fastreport可以吗?
- 菜单控件,在线等待!!!
- 做单机的人事管理程序,用什么数据库最方便?
- 如何使TDBCheckBox连接Access数据库的某表的一"是/否"字段,默认是“是”或“否”,不要让其默认为灰白状态?
- 挑战性的问题:能不能实现在局域网(全为win98)上,一台机器能够访问到另一台机器未设为共享的文件,并且可以任意改写?
- 请推荐一本好的介绍多层次架构编程的书
- 求救!在deiphi里不调用word,怎么能打开doc文件,并且不可以改变doc文件的格式!
- 谁知道那里有远程攻击类的程序代码,要求对攻击难易度进行分析?急用毕设,在线等给150
然后再MD.TABLE.APPEND ...... MD.TABLE.POST
begin
sql.add('insert into tablename fieldname) values('+''''+edit1.text+''''+')');
executesql;
end;
2、在Button1.Click事件中:
With TQuery.Create(nil) do//动态创建TQUERY,也可以静态先设置。
begin
DataBaseName := ''; //写上数据库别名。
SQL.ADD('Insert BM (BM_MC)');
SQL.ADD('Values :MC');
ParamByName('MC').AsString := Edit1.Text;
ExecSQL;
Close;
Free;
end;OK? 够详细了吧。