delphi数据库操作
‘壹’ Delphi中如何多线程操作数据库中的数据表
1。通过线程的互斥来同步操作数据库 2。数据库采用事务处理表中的数据 3。采用共享方式打开数据库，不是以独占方式打开数据库 建立一个mysql连接表加上一个临界区，表结点是这样的（mysqlcon,bool)，根据实际情况定大校我用的是10个连接。
‘贰’ delphi 操作数据库!!! 急!!!
简单来说就是一个表减少一条记录
另一个表增加一条相同的记录
而且两个表的内容都相同是吧
var
cph:String;
with DM.Qxyclkscx do
begin
Close;
SQL.Clear;
sql.add('insert into XYCLXXCX values('+quotedstr(dm.ADODSZLDJ.FieldByName('cph').AsString)+','+quotedstr
(dm.ADODSZLDJ.FieldByName('clmc').AsString)+','+quotedstr
(dm.ADODSZLDJ.FieldByName('clys').AsString)+','+quotedstr
(dm.ADODSZLDJ.FieldByName('clbh').AsString)+')');
ExecSQL;
end;
cph:=dm.ADODSZLDJ.FieldByName('cph').AsString;
with DM.CLXXdo
begin
Close;
SQL.Clear;
sql.add('delete from CLXX where cph='+quotedstr(cph));
ExecSQL;
end;
‘叁’ 试简述Delphi中快速建立一个简单数据库程序的步骤，包括所用控件及设置方法（以access数据库为例）
假设你建好了access数据库，那么，操作如下：
1. 在ADO标签里拉出一个ADOConnection控件，用于与数据库建立连接，建议将loginprompt属性去掉。
2.在ADO标签里拉出一个ADOQuery控件，用于查询数据库，并得到数据集合。
设置其connection属性为上面添加的ADOConnection控件的名字。
设置其SQL属性比如为 select * from 数据表名称
设置其Active属性为true
3.从Data Access标签里拉出一个DataSource控件，他是一个位于ADOQuery控件和其他数据显示控件的中介。
设置其Dataset属性为上面添加的ADOQuery控件的名字
4.从Data Control标签里拉出一个DBGrid控件，一个DBNavigator控件，两者的DataSource属性都设置为上面添加的DataSource控件的名字。
双击DBGrid控件，在弹出菜单上“添加所有字段”
‘肆’ DELPHI 数据库 操作
在引用部分加入 :
uses ComObj;
实现部分 :
procere TFormOffice.BitBtn1Click(Sender: TObject);
var
CreateAccess:OleVariant;
begin
CreateAccess:=CreateOleObject('ADOX.Catalog');
CreateAccess.Create('Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\Aceco.mdb');
end;
说明 :
1 、在 C:\ 下创建 Aceco.mdb;
2 、是 Access2000 格式 ,用 Access97 打不开 ;
3 、系统需安装 MDAC,这是好消息 ,客户不需安装 Access 也可以
‘伍’ 用delphi做的程序如何连接SQL数据库应该怎么操作
新建模块单元、添加ADOconnection控件，双击该控件，点击build，选择for
sql。。。
‘陆’ delphi中如何实现对sql数据库记录进行添加,删除,修改
使用ADO，首先用ADOConnection对象建立连接，然后使用ADOQuery对象对数据库进行操作。
ADOQuery对象操作：
查询：先使用close；再设置SQL.text为SQL查询语句内容；最后使用OPEN方法打开
添加：Append或Insert；FieldByName（'字段名'）.Value
:=
字段内容；Post；
修改：Edit；FieldByName（'字段名'）.Value
:=
字段内容；Post；
删除：定位到指定记录（使用循环）；Delete；
‘柒’ delphi对ACCESS数据库操作
添加ado控件 用作查询这个就不说了 代码如下
begin
with adoquery1 do begin
close;
sql.clear;
sql.text:='select * from tab1';
open;
edit1.Text:=fields[0];
edit2.Text:=fields[1];
edit3.Text:=fields[2];
end;
end;
‘捌’ 关于DELPHI动态数据库
在Delphi中动态建立数据库结构
--------------------------------------------------------------------------------
一、问题的提出
在程序运行过程中动态建立数据库结构是我们编写功能通用的数据库管理系统常见
的问题。通用数据库管理系统开发的基本思路是:系统允许用户自行设定管理对象的数据
库结构,然后通过算法和编程技巧,在用户设定完成后动态创建管理对象的数据库结构和
完成系统功能的一些其它数据,这样可以满足不同用户对管理系统管理项目的不同要求,
进而达到通用的目的。因此,通用数据库管理系统开发的关键是系统能否动态地创建数据
库结构。我们熟悉的Foxbase+、Foxpro等语言,均提供了动态创建数据库结构的命令或过
程。
但是,在许多资料和书籍中,没有介绍用Delphi如何动态建立数据库结构,给我们开发
一些功能通用的数据库管理系统带来了不便。那么如何在Delphi中动态建立数据库结构
呢?本文是作者在查阅大量资料,经过反复实践的基础上得出的在Delphi中动态创建数据
库结构的方法。
二、设置Delphi数据库配置程序
在Delphi中要进行数据库管理必须先设置好数据库配置程序BDE,所有对数据库的操
作,最后都要通过BDE去完成。下面以最常见的Dbase数据库为例来配置Delphi的数据库引
擎BDE。
1. 进入Delphi的集成开发环境IDE(Integrated Development Environment),在Dat
abase菜单下选择Explore,出现SQL Explorer窗体,在Object菜单下选择BDE Administra
tor。
2. 出现BDE Administrator窗体后在Database页上选择Dbase,在Definition页中将
Type项设为Standard;将Default Driver项设为Dbase;将Path项设为一工作目录名(如:D
:\MYNAME)。以上过程即为数据库的别名(Aliases)设置,这在以后Delphi的程序开发过程
中要经常用到。
3. 选择Configration页,在Drivers的Native项中选择Dbase,在Definition页中将T
ype项设为File;将Langdriver项设为DBASE CHS CP936;将Level项设为5。
4. 完成上述工作后,在Object菜单中选择Save as Configration,按出现的对话框要
求将以上的设置保存好。至此,数据库的基本配置工作就完成了,我们就可以进行下面的
工作了。
三、动态创建数据库结构方法
在Delphi中动态创建数据库结构有两种方法。
方法一:使用Table组件的CreateTable方法。步骤如下:
1. 进入Delphi的IDE建立一个新项目文件和新窗体(Form1)单元文件(unit1.pas)。
2. 在Form1上加入Table1、Edit1、Edit2、Button1组件。将Button1组件的Captio
属性设为‘创建’。
3. 用鼠标双击Button1进入Unit1.pas单元文件,在光标处加入下列代码。
with table1 do
egi
active:=false
databasename:=‘dbase'
tablename:=‘my.dbf'
tabletype:=ttdbase
fielddefs.clear
fielddefs.add(edit1.text,ftstring,10,false)
fielddefs.add(edit2.text,ftinteger,0,false)
createtable
end
4. 按F9键编译运行,在Edit1处输入一字段名称:ZD1,在Edit2处输入一字段名称:ZD
2,然后点击"创建"按钮,程序将在D:\MYNAME目录中产生一个名为MY.DBF的数据库文件,用
Database Desktop查看文件结构如下:
FieldName
Type
Size
Dec
ZD1 C 10
ZD2 N 11
方法二:使用Query组件,用结构化查询语言SQL(Structured Query Language)语句创
建,步骤如下:
1. 同方法一之步骤1。
2. 在Form1窗体中加入Query1、Button1组件,将Query1的Database Name属性设为‘
Dbase’;将Button1组件的Caption属性设为‘创建’。
3. 在Query1的SQL属性单击,出现Sting List Editor窗口,在该窗体中输入以下SQL
语句:
Create Table My(
ZD1 Char(10),
ZD2 Numeric(10,2))
4. 双击Button1进入Unit1.pas单元,在光标处加入下列代码:
Query1.ExecSQL
5. 按F9键 编译运行,在"创建"按钮处单击即可产生一个名为MY.DBF的数据库文件,
存放在D:\MYNAME目录中,用Database Desktop查看其结构如下:
FieldName Type Size Dec
ZD1 C 10
ZD2 N 10 2
以上所介绍的操作和程序均在Windows98操作系统下,Delphi 3.0 C/S版上调试运行
通过。
‘玖’ DELPHI数据库操作
用SQL查询语名进行:
1、用查询回车选定一条记录,插入到销售表中．
假设库存表字段为：(零件号,名称,单价,数量)：
销售表字段为：(零件号1,名称1,单价1,数量1)
query1.close;
query1.sql.clear;
query1.sql.add('insert into 销售表(零件号1,名称1,单价1,数量1) select (零件号,名称,单价,数量) from 库存表 where 条件 ');
query1.prepare;
query1.exesql;
这方面的书太多,到大书店都能购到,不过我建议你买一些Delphi数据库编程方面带实例方面的书看看.
‘拾’ DELPHI操作access数据库
最好用ado来操作，先拖几个控件adoconnection,adoquery,datasource，然后把adoconnection连到你的access数据库，设置一个按钮做为保存，点击按钮后操作如下
adoquery1.close;
adoquery1.sql.clear;
adoquery1.sql.add('insert into 你的表 (姓名,职业,年龄) values (:edit1.text,:edit2.text,:edit3.text)');
adoquery1.execsql;
我没给你试代码，可能中间有的标符号不对，你自己上机调试一下，具体的思路就是这样的