//查询记录 procedure TForm1.Button1Click(Sender: TObject); begin ADOQuery.Close; ADOQuery.SQL.Clear; ADOQuery.SQL.Add(‘select * from YourTABLE where 查询条件‘); ADOQuery.Open; //插入记录 procedure TForm1.Button2Click(Sender: TObject); begin ADOQuery.Close; ADOQuery.SQL.Clear; ADOQuery.SQL.Text:=‘insert into YourTABLE(字段1，字段2) values(:字段1,:字段2)‘; // ADOQuery.SQL.Add(‘insert into You...
查询记录 procedure TForm1.Button1Click(Sender: TObject); begin ADOQuery.Close; ADOQuery.SQL.Clear; ADOQuery.SQL.Add(‘select * from YourTABLE where 查询条件‘); ADOQuery.Open;//插入记录 procedure TForm1.Button2Click(Sender: TObject); begin ADOQuery.Close; ADOQuery.SQL.Clear; ADOQuery.SQL.Text:=‘insert into YourTABLE(字段1，字段2) values(:字段1,:字段2)‘; // ADOQuery.SQL.Add(‘insert into YourTABL...
Delphi 通过ADO连接数据库标签：inf alt 连接数据库 数据库 图片 技术 phi http ima 本文系统来源：https://www.cnblogs.com/fanweisheng/p/11385205.html
CS数据库连接-delphi+inichinayaosir{delphi connection database with ini file}unit DataModule;interfaceuses SysUtils, Classes, DB, ADODB,INIFiles;type TDataModule1 = class(TDataModule) ADOConnection1: TADOConnection; procedure DataModuleCreate(Sender: TObject); private { Private declarations } public { Public declarations } end;var DataModule1: TDataModule1;implementation{$R *.dfm}{db....
本例效果图:unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, Grids, DBGrids, DB, DBClient, StdCtrls, ComCtrls, ExtCtrls;type TForm1 = class(TForm) DataSource1: TDataSource; ClientDataSet1: TClientDataSet; DBGrid1: TDBGrid; TreeView1: TTreeView; Splitter1: TSplitter; procedure FormCreate(Sender: TObject); p...