没有合适的资源?快使用搜索试试~ 我知道了~
delphi+access项目开发笔记.pdf
1.该资源内容由用户上传,如若侵权请联系客服进行举报
2.虚拟产品一经售出概不退款(资源遇到问题,请及时私信上传者)
2.虚拟产品一经售出概不退款(资源遇到问题,请及时私信上传者)
版权申诉
0 下载量 119 浏览量
2021-10-27
14:49:59
上传
评论
收藏 30KB PDF 举报
温馨提示
试读
3页
delphi+access项目开发笔记.pdf
资源推荐
资源详情
资源评论
一、 Delphi 连接 ACCESS的方法
在窗体中加 ADOQuery1 ,ADOConnection1 。(ADO 标签内)
ADOConnection1 中属性 ConnectionString 连接到你的数据库(选择连接到你的数据
库路径); ADOQuery1 控件中属性 Connection 为 ADOConnection1 。
在窗体创建的时候设置数据库连接字符串 (access 带密码) :
procedure TForm3.FormCreate(Sender: TObject);
begin
ADOConnection1.ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0;Data
Source='
+ ExtractFilePath(Application.EXEName)
+'database/test.mdb;Persist Security Info=False; '
+'Jet OLEDB:Database Password=159753';
end;
二、 Delphi 数据库集合循环操作 ( 字符串截取、变量类型转换 )
ADOQuery2.SQL.Add('select * from table');
ADOQuery2.Prepared;
ADOQuery2.Open;
ADOQuery2.first;
while not ADOQuery2.eof do
begin
//开始循环
t1:= copy(ADOQuery2.FieldByName ('DZSJ').asstring,1,2);
t2:=strtoint(t1);
end;
三、 Delphi 数据库查询、获得某字段的值
ADOQuery4.Close;
ADOQuery4.SQL.Clear;
ADOQuery4.SQL.Add('select * from table);
ADOQuery4.SQL.Add('where YCH=:YCH1');
ADOQuery4.Parameters.ParamByName('YCH1').Value:= Edit1.text;
ADOQuery4.Prepared;
ADOQuery4.Open;
Edit2.text:=ADOQuery4.FieldByName ('JS').asstring;
ADOQuery4.Close;
四、 Delphi 数据库写入值
ADOQuery1.Close;
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add('select * from table1');
ADOQuery1.Prepared;
资源评论
Andrealinnnnn
- 粉丝: 0
- 资源: 816
下载权益
C知道特权
VIP文章
课程特权
开通VIP
上传资源 快速赚钱
- 我的内容管理 展开
- 我的资源 快来上传第一个资源
- 我的收益 登录查看自己的收益
- 我的积分 登录查看自己的积分
- 我的C币 登录后查看C币余额
- 我的收藏
- 我的下载
- 下载帮助
安全验证
文档复制为VIP权益,开通VIP直接复制
信息提交成功