delphi数据库问题 ( 积分: 12 )

我做了一个delphi超作access数据库的小程序,用ado连数据库,用的是edit输入数据,dbgrid显示数据,放了datasource和adotable组件及dbnavigator用来显示数据我设置完后没有什么反应,不知道用edit怎么样才能输入数据到dbgrid中,谢谢,并可以编缉,越详细越好谢谢.这是我所有的积分不要嫌少哦

发个例子给你，procedure TForm1.FormCreate(Sender: TObject);
begin
LogTimes := 0;
ChDir(ExtractFilePath(Application.ExeName));
ChDir('..');
ExeRootPath := GetCurrentDir;
{ used language }
ParaIni := TInifile.Create(ExeRootPath+'/config/parameter.ini');
DataFile := ExeRootPath+'/Data/lgsmdata.mdb';
//passado.Close;
passado.ConnectionString:= 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source='+DataFile+'; Jet OLEDBatabase Password=aaa; Persist Security Info=False;';

主要是要设置ADO的 connectionstring 的属性

1、先设置ADO的connectstring属性指到你的acess库上；
2、再设置adotable的表名。
3、设置datasource的属性指向adotable;
4、设置dbnavigator的属性指向adotable;
5、开始编写edit的入库代码；
6、刷新dbgrid（adotable.close;adotable.open）。

1、先设置ADO的connectstring属性指到你的acess库上；
2、再设置adotable的表名。
3、设置datasource的属性指向adotable;
4、设置dbnavigator的属性指向adotable;
5、开始编写edit的入库代码；
例如：edit1.text:=...fieldbyname('你要设置的字段名').AsString;
6、刷新dbgrid（adotable.close;adotable.open）。

passado.ConnectionString:= 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source='+DataFile+'; Jet OLEDBatabase Password=aaa; Persist Security Info=False;';