FireDAC简易教程(VCL)

FireDAC简易教程 1、VCL下的FireDAC 1.创建数据库连接： 新建一个VCL Forms Application工程，放置一个TFDConnection控件，设置其ConnectionDefName属性，这里选择SQLite_Demo。当Connected属性设置为True时，弹出一个登陆对话框。 这个Demo是没有密码的，直接点OK进入。当连接成功，Connected属性会一直为True。 2.取数据表： 放置一个TFDQuery控件，这个控件主要用来设置SQL命令，以操控数据。Connection属性选择FDConnection1。点击SQL属性弹出SQL命令设置窗口，写下代码获取表Orders数据： SELECT * FROM Orders 3.显示数据表内容： 放置一个 TDataSource控件，将DataSet属性设置为TFDQuery1，再放一个TDBGrid控件，DataSource属性设置为DataSource1，最后将TFDQuery1的Active属性设置为True。数据内容就显示到TDBGrid1中了。 实际运行中，还需要添加以下两个控件： TFDPhysMSSQLDriverLink TFDGUIxWaitCursor 再复习一下，用语句建立数据连接： 1.建立VCL工程，将C:\Program Files\Embarcadero\Studio\16.0\Samples\Data\fddemo.sdb数据文件拷贝到D:\目录下。如果安装目录不是上面的，自己搜索下。 2.放置控件：TFDConnection、TFDQuery、TDataSource、TDBGrid、FDPhysSQLiteDriverLink、 TFDGUIxWaitCursor 3.设置控件属性： procedure TForm1.FormCreate(Sender: TObject); var path:string; begin path:= 'D:\fddemo.sdb'; FDConnection1.Params.Database:=path; FDConnection1.DriverName:='SQLite'; FDConnection1.Connected:=True; FDQuery1.Connection:=FDConnection1; FDQuery1.SQL.Add('SELECT * FROM Orders'); DataSource1.DataSet:=FDQuery1; DBGrid1.DataSource:=DataSource1; FDQuery1.Active:=True; end;