query1.close; ....... query1.sql.add('insert into (a) values (:a)'); query1.parambyname('a').asstring:=edit1.text; query1.open;
to hawksoft(明月清风) 我的目的是用edit诓现实后,经过修改再写回数据库的该字段,用DBEdit可以写回吗?
如下:将TEDIT内容保存到数据库 table1.open; with table1 do begin append; table1.fieldbyname['字段'].asstring:=edit1.text; ..... post; end;修改好的保存反一下如: edit1.text:=table1.fieldbyname['字段'].asstring;自己试试呵呵!!!!不要用TDBEDIT~~~反正我不喜欢用呵呵
过程如下:
1、添加一个TQuery或TTable控件做数据集.
2、添加一个TDataSource控件其DataSet属性指向TQuery或TTable
3、DBGrid的DataSource指向TDataSource.8个DBEdit的DataSource也指向TDataSource.建议你找本Delphi数据库编程看看。看来你还没入门啊!
.......
query1.sql.add('insert into (a) values (:a)');
query1.parambyname('a').asstring:=edit1.text;
query1.open;
table1.open;
with table1 do
begin
append;
table1.fieldbyname['字段'].asstring:=edit1.text;
.....
post;
end;修改好的保存反一下如:
edit1.text:=table1.fieldbyname['字段'].asstring;自己试试呵呵!!!!不要用TDBEDIT~~~反正我不喜欢用呵呵
append;
table1.fieldbyname['字段'].asstring:=edit1.text;
.....
post;第二点:
在Ttable的AfterScroll事件中加入代码可以实现edit与TDBGRID同步!Edit1.text:= table1.fieldbyname['字段'].asstring
..........
close;
sql.clear;
sql.add('insert into (a) values("'+edit1.text+'")');
sql.execsql;
下面的问题要用dbedit的 自己再试试
dbedit要设置好字段值