delphi如何实现窗口添加数据到数据库里?

2025-02-23 15:07:27
推荐回答(4个)
回答1:

你最好使用数据库感知控件,DBEDIT等等,如果你使用普通控件,要多写一些代码,看样子你对数据库操作不太熟悉,应该多读一些基础的书。
1.你如果用数据库感知控件,保存的时候用post直接提交。如果用普通控件,你需要把edit.text值赋给字段再post提交
2.DM做公用数据模块,你需要在调用的子窗里引用就行了,uses DM;
3,关于“怎样做才能把子窗口的数据录到父窗口的DBGrid里?”这个问题,一般这样解决,在子窗体做一个向数据库里录入的功能,保存以后,父窗体重新查询一下。

回答2:

用什么感知组件咯,你按显示子窗按钮时,给子窗的编辑框赋值,按确定按钮时将数据通过那个与网格连接着的数据组件将子窗上的数据保存数据表,网格表就会立即显示你刚才保存的数据,这时你可以继续录入数据,也可以关闭子窗。我总认为数据感知组件除了网格表之外,其它感知组件不是那么好用,显示一些数据在里面,相反不好。

回答3:

1,2: button1.click 事件中
edit1.text:=datetimetostr(date(now)); //
3: 我一般是用的ADOQUERY+DATASOURCE
ADOQRERY.CONNECTSTRING:='你的数据库路径什么的';
with adoquery do
begin
close;
sql.clear;
sql.add(select ...from...where...);
open;
edit;
//append;
fieldbyname('字段名1').asstring:=edit1.text;
fieldbyname('字段名2').asstring:=edit2.text;
...
post;
end;
父窗口.dbgrid1.datasource:=datasource1;
父窗口.dbgrid1.refresh;
...
end;
...
我也不怎么会,差不多就这样了.现在机子装不了windows 程序,无法给完整有效代码了

回答4:

procedure TForm1.Button1Click(Sender: TObject);
begin
form2.edit1.text:=datatimetostr(now);
form2.show;
end;