delphi数据库 不用数据库进行数据存储

来源：蜘蛛抓取(WebSpider) 时间：2018-08-13 09:00 标签： access数据库管理系统
查看: 8489|回复: 3
Delphi XE6 实现SQLite数据库的操作
主题帖子积分
论坛元老, 积分 4501, 距离下一级还需 9995498 积分
论坛元老, 积分 4501, 距离下一级还需 9995498 积分
马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。
才可以下载或查看，没有帐号？
(7.47 KB, 下载次数: 2116)
09:29 上传
点击文件名下载附件
无标题.png (11.66 KB, 下载次数: 364)
09:28 上传
本程序通过Delphi XE6 实现SQLite数据库的操作，代码包含了连接数据库、添加数据、删除数据等操作。不过代码附件中没有包含SQLite需要的数据库文件，需要下载SQLite相关的文件，放到这个程序目录下面，这个具体就不介绍了。
首先需要连接数据库
procedure TSQLiteForm.FormCreate(Sender: TObject);
begin
&&try
& & // For unidirectional dataset, don't refill automatically when dataset is activated
& & // because dataset is reactivated everytime use DataSet.First.
& & LinkFillControlToField1.AutoActivate := F
& & LinkFillControlToField1.AutoFill := F
& & Application.OnIdle := OnI
& & TaskList.Connected := T
& & SQLDataSetTask.Active := T
& & LinkFillControlToField1.BindList.FillL
&&except
& & on e: Exception do
& & begin
& && &SHowMessage(e.Message);
& &
&&
复制代码
当数据库连接失败后，会通过消息框弹出消息，例如找不到数据库文件或者其他。
当数据库连接完成后，可以对数据进行添加和删除，删除数据的代码
procedure TSQLiteForm.btnDeleteClick(Sender: TObject);
var
&&TaskName: S
&&LIndex: I
begin
&&TaskName := ListBox1.Selected.T
&&try
& & SQLQueryDelete.ParamByName('TaskName').AsString := TaskN
& & SQLQueryDelete.ExecSQL();
& & SQLDataSetTask.R
& & LinkFillControlToField1.BindList.FillL
& & if (ListBox1.Selected = nil) and (ListBox1.Count & 0) then
& && &// Select last item
& && &ListBox1.ItemIndex := ListBox1.Count - 1;
&&except
& & on e: Exception do
& & begin
& && &SHowMessage(e.Message);
& &
&&
复制代码
转载请保留当前帖子的链接： 谢谢！
搜索简单，分享不易，且分享且珍惜，您难道不想分享下您的心得？如果觉得本文章好的话，您可以在我们网站上注册，然后发布您的好的心得，让大家共同进步，谢谢！
主题帖子积分
中级会员, 积分 310, 距离下一级还需 190 积分
中级会员, 积分 310, 距离下一级还需 190 积分
你倒是&&解释一下啊？，数据库文件 在哪里
sqlite 在哪里下载，又没有说明？
用的那个数据库啊
主题帖子积分
新手上路, 积分 14, 距离下一级还需 36 积分
新手上路, 积分 14, 距离下一级还需 36 积分
可以用最新的SQLITE 3吗？
主题帖子积分
新手上路, 积分 18, 距离下一级还需 32 积分
新手上路, 积分 18, 距离下一级还需 32 积分
数据库的结构可否发出来？
Powered by【图文】Delphi_7.0数据库应用教程_百度文库
您的浏览器Javascript被禁用，需开启后体验完整功能，
享专业文档下载特权
&赠共享文档下载特权
&100W篇文档免费专享
&每天抽奖多种福利
两大类热门资源免费畅读
续费一年阅读会员，立省24元！
Delphi_7.0数据库应用教程
阅读已结束，下载本文到电脑
定制HR最喜欢的简历
你可能喜欢用Delphi进行数据库之间转换
00:00&&&&逸仙时空
p>　　在实际应用中,可能会遇到将一种数据库转为另一种数据库的情况,而Delphi可以完成这种功能。尤其是需要将以前的dbase 数据库结构及内容转换成其它数据库结构时,采用此方法简单、快速且安全。
　　Delphi是一种Windows应用程序开发软件。它速度快,具有强大且容易使用的可视化开发环境,并采用了具有弹性和可重用的完整的面向对象程序语言。
　　由于以上的这些特点,Delphi可以让我们快速地建立起主从结构的应用程序,可产生单一可执行文件与动态链接库以及从单机、网络到主从结构的应用程序。
　　使用Delhpi可以方便而快速地建立强大的数据库应用程序,可以和Paradox、dbase、Lo cal InterBase Server、Foxpro及ODBC数据源等多种桌面型数据库直接配合使用。
　　数据库转换方法
　　1.所使用的控件
　　2.TBatchMove控件的使用TBatchMove允许在一组记录或是整个数据表中执行特种作业, 这个控件的主要用途在于把数据从服务器中卸到本地的数据源供分析或进行其他操作。TBatchMove可以在目的地建立对应于原数据表内容的数据表,自动将列名及数据类型进行适当的对应操作。
　　TBatchMove两个特性指明批量移动(Batch Move)操作的源表及目的表。Source指定一个对应于已有的源数据表的数据集(一个Tquery或Ttable控件),Destination指明对应于一个数据库数据表的Ttable控件,目的数据表可以是已经存在的也可以是不存在的。
　　Mode特性指明TBatchMove对象所要做的事情:
　　我们可以根据batCopy模式,对数据库类型进行适当的转换,以下是从dBASE类型到其它类型之间的转换结果:
　　数据库转换举例现有用Foxbase开发的财务程序中的会计科目数据库(kjkmk.dbf),系统将升级到Window s环境下开发,数据库将采用Paradox语言。为了沿用该库结构和数据,可采用如下方法进行转换。
　　1.Datasource1控件: AutoEdit True DataSet Table1 Enabled True Name DataSorce1
　　2.Table1控件: DatabaseName cw Name Table1 Readonly False TableName KJKMK TableType
udBase Datasource1控件和Table1控件共同定义被转换的源文件,该文件是在别名为cw里的kjk mk,文件类型为Dbase。
　　3.BatchMove1控件: Destination Table2 Mode balCopy Name BatchMove1 Sorce Table1
MatchMovel控件定义转换类型为Copy以及源文件、目标文件。
　　4.Datasource2控件: AutoEdit T
DataSet Table2 Enabled True Name DataSorce2
Table2控件: DatabaseName cwdb Name Table2 Readonly False TableName KJKMK TableType
uParadox Datasource2控件和Table2控件共同定义转换后的目标文件, 该文件是在别名为cwdb里的kjkmk,文件类型为Paradox。
　　6.DbGrid1控件: Datasorce Datasorce1 Name DbGridl DbGridl网格控件先定义源文件,执行转换后再定义目标文件,
主要用于方便查看。
　　7.Button1控件: OnClck ButtonClck OndragDrop Ondragover OnEnddrag 该控件有一个OnClick事件,表示执行文件类型转换。其代码如下:
procedure TForm1.Button1Click(Sender:TObject); begin BatchMove1.
　　经上述方法定义,编译执行后,即可将kjkmk.dbf文件转换成kjkmk.db文件,然后就可以用Database Desktop工具对其进行修改调整。
　　用此方法还可进行其它任意文件的转换。
+1你赞过了
&2018 天极网旗下网站 上传我的文档
 上传文档
 下载
 收藏
粉丝量：11
该文档贡献者很忙，什么也没留下。
 下载此文档
在Delphi7中数据库查询方法的实现
下载积分：1199
内容提示：在Delphi7中数据库查询方法的实现
文档格式：PDF|
浏览次数：312|
上传日期： 01:44:51|
文档星级：
全文阅读已结束，如果下载本文需要使用
 1199 积分
下载此文档
该用户还上传了这些文档
在Delphi7中数据库查询方法的实现
关注微信公众号在delphi中的edit中写入数据，保存到数据库中，怎么写程序？ 我 用的是SQL2000数据库。
本回答由提问者推荐
var sogou_ad_id=731547;
var sogou_ad_height=160;
var sogou_ad_width=690;

我要回帖

更多关于 access数据库管理系统 的文章

 

随机推荐