Sqlite简介以及delphi7应用示例

上次使用发现有一些问题，今天再次测试了一下，估计当时是因为操作问题。

现在把一个简单完整的delphi的例子放上大家看看：

1、新建应用程序
2、在默认窗体上拖放一个ASQLite3DB控件、一个ASQLite3Query、一个dbgrid、一个datasource。设置好各个控件的连接，ASQLite3Query的connection设置为ASQLite3DB，dbgrid的datasource设置为datasource，datasource的数据集dataset设置为ASQLite3Query。
3、拖放一个按钮，2个label，2个edit。

双击窗体，加入oncreate事件：
  if not fileexists('db.dat') then
    begin
      asdbconn.Database := 'db.dat';
      asdbconn.Close;
      asdbconn.Open;
      asdbconn.SQLite3_ExecSQL('create table inf (id integer primary key, name varchar(255), num numeric)');
    end;
//检查是否存在该数据库文件，没有则新建并创建该文件
  asdbconn.Database := 'db.dat';
  asdbconn.Close;
  asdbconn.Open;
  asquery.SQL.Text:='select * from inf';
  asquery.Open;

双击按钮，加入onclick事件： 
  asdbconn.SQLite3_ExecSQL('insert into inf(name,num) values('''+ edit1.text +''','+ edit2.Text +')');
  asquery.Close;
  asquery.SQL.Text:='select * from inf';
  asquery.Open;