lazarus创建sqlite数据库

fzh5810

今天就学了这个，现在将所学的贴出来，留给后来者：
1、首先将sqlite3.dll复制到你的系统system32（Windows XP）目录下
2、其次，lazarus中需要安装sqlite3dataset组件（安装不多说了，安装包在x:\lazarus\components\sqlite下）
3、编译后打开Lazarus，在use下添加两个引用：StdCtrls, db
4、可以尝试将下面的代码添加到你的事件中（代码来源于网上，不自己写了，很简单）：
var
    dsTest:TSqlite3Dataset;
begin
   dsTest:= TSqlite3Dataset.Create(nil);
   with dsTest do
   Begin
      FileName:='New.db';
      TableName:='NewTable';
      if not FileExists(FileName) then
      begin
        with FieldDefs do
          begin
            Clear;
            Add('Integer',ftInteger,0,False);
            Add('String',ftString,0,False);
            Add('Bool',ftBoolean,0,False);
            Add('Float',ftFloat,0,False);
            Add('Word',ftWord,0,False);
            Add('DateTime',ftDateTime,0,False);
            Add('Date',ftDate,0,False);
            Add('Time',ftTime,0,False);
          end;
      end;
     CreateTable;
   end;


好了，编译运行一下后，可以在程序目录下找New.db，数据库创建成功

（最近在学lazarus,谢谢群里各位前辈的支持！QQ:460570870）

猫工

好样的

banshihong

边学边卖！呵呵

逍遥派掌门人

生成的数据库用sqlite3.exe 读取的时候显示错误.