zoukankan      html  css  js  c++  java
  • DelphiXE7操作sqlite数据库

    相关资料:
    https://www.cnblogs.com/barryhong/p/3884977.html
     
    准备工作:
    1.用SQLiteExpertPers建立一个sqlite数据库。
    2.打开delphi xe7。
    一、FireDAC法
    设置库联接
    1.放入FDConnection1控件
    2.放入FDConnection1.DriverName := SQLite
    3.点击“FDConnection1.Params”
    4.在“FDConnection1.Params”中写入
      DriverID=SQLite
      Database=C:UserszhujianqiangDesktopsqlitesqlite.db  //你的sqlite数据库路径
    5.点“确定”
    6.设置FDConnection1.Connected为True。
     
    设置表联接
    1.放入FDQuery1控件
    2.设置FDQuery1.Connection为FDConnection1。
    3.点击设置FDQuery1.SQL。
    4.在FDQuery1.SQL.Text中写入select * from Tmanual。
    5.设置FDQuery1.Active为True。
     
    设置数据桥
    1.放入DataSource1控件
    2.设置DataSource1.DataSet为FDQuery1。
     
    设置数据显示
    1.放入DBGrid1控件
    2.设置DBGrid1.DataSource为DataSource1。
    PS:在窗体或是数据模块中必须放入FDPhysSQLiteDriverLink1、FDGUIxWaitCursor1这二个控件。有朋友说这是等于注册DLL。
     
    二、SQL控件法
    设置库联接
    1.放入SQLConnection1控件
    2.设置SQLConnection1.ConnectionName*为SQLITECONNECTION。
    3.设置SQLConnection1.Params中的Database
      为C:UserszhujianqiangDesktopsqlitesqlite.db  //你的sqlite数据库路径
    4.点“确定”
    5.设置SQLConnection1.Connected为True。
     
    设置表联接
    1.放入SQLQuery1控件
    2.设置SQLQuery1.SQLConnection为SQLConnection1。
    3.设置SQLQuery1.SQL。
    4.在SQLQuery1.SQL.Text中写入select * from Tmanual。
    5.设置FDQuery1.Active为True。
     
    设置数据转换
    1.放入DataSetProvider1。
    2.设置DataSetProvider1.DataSet为SQLQuery1。
    3.放入ClientDataSet1。
    4.设置ClientDataSet1.ProviderName为DataSetProvider1。
     
    设置数据桥
    1.放入DataSource1控件
    2.设置DataSource1.DataSet为ClientDataSet1。
     
    设置数据显示
    1.放入DBGrid1控件
    2.设置DBGrid1.DataSource为DataSource1。
     
     
    PS:代码联接方式

    procedure TForm1.Button1Click(Sender: TObject);
    begin
    FDConnection1.Connected := False;
    FDConnection1.Params.Clear;
    FDConnection1.Params.Add('Database='+ ExtractFilePath(Application.Exename) +'TianJin.db');
    FDConnection1.Params.Add('DriverID=SQLite');
    FDConnection1.Connected := True;

    FDQuery1.Active := True;
    end;

     
  • 相关阅读:
    内网或无域名服务器集成微信公众号接口
    记录一次重新学习SetInternal和SetTimeout
    SQLServer日志过大导致还原失败的解决方案
    批量修改SQLServer数据库表字段属性
    收缩SQLServer数据库解决日志占用空间过大(2008R2以上版本)
    SAP GUI安装出现ocx错误提示的解决办法
    .NetCore自动转换枚举类显示自定义中文名称
    EFCore-脚手架Scaffold发生Build Failed问题的终极解决
    .NetCore自定义WebAPI返回Json的格式大小写的三种方式
    存储过程模糊搜索,按匹配率排序初探
  • 原文地址:https://www.cnblogs.com/FKdelphi/p/4633763.html
Copyright © 2011-2022 走看看