//查询记录
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...