delphi + sqlite3

2011-07-07 01:59:50 953 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

wansuiwht 墨衍会员 · AI 创作全网分发关注 + 加入社区

【一起学SQLite】--Delphi下的SQLite之简介(3) 【一起学SQLite】--Delphi下的SQLite之简介(3) 阅读详情

delphi+sqlite3如何静态连接呢。在网上看了一些，别人也传给我了一堆OBJ文件，
可是编译的时候报一堆错，听说好像跟什么顺序有关。
谁教教我啊。

...全文

深入浅出DDR系列(二)--DDR工作原理学习完了DDR的基本组成和硬件结构原理之后，从整体上了解了DDR的特性和静态图，包括原理、管脚图等。那么本章就要从动态的角度来分析时序结构，包括read/write的整个过程到数据返回发生了什么，其中包括以下内容 DDR是如何完成Read、Write 等的操作 DDR的基本命令 DDR的时序参数 DDR的性能分析 1. DRAM基本组成对于DRAM，其主要由行和列组成，每一个bit中都是由类似右下图的类晶体管的结构组成，对于sdram的数据，可以通过控制column和row就可以访问sd 阅读详情

wansuiwht

数据库相关 2,508 成员 88,437 内容

+ 关注 + 加入社区

切换为时间正序

wansuiwht 2011-10-15

打赏
举报

承蒙高人指点，我也搞定，多谢各位大哥。

haitao 2011-08-01

打赏
举报

[Quote=引用 22 楼 jianke5555 的回复:]
Delphi纯代码连SQLite数据库:
http://www.cnblogs.com/xunxun/archive/2011/03/03/1969682.html
已试过，有效！
[/Quote]

好像是07年的dll，与最新的dll比，会不会少一下功能或有一些bug？
支持加密的dll，需要特别的pas吧？

jianke5555 2011-07-31

打赏
举报

Delphi纯代码连SQLite数据库:
http://www.cnblogs.com/xunxun/archive/2011/03/03/1969682.html
已试过，有效！

林石公 2011-07-28

打赏
举报

可以参照asqlite控件,它有静态安装的东西
原来是在http://www.aducom.com

haitao 2011-07-28

打赏
举报

昨天下载了unidac，好像也需要sqlite3.dll的

sqlite缺省不支持加密，的确是比较难受
静态编译，obj只能是borland自己的格式，比较流行的vc生成的obj还不能用，也是麻烦

一剑飘雪 2011-07-28

打赏
举报

楼上的可以？

lwm08106542000 2011-07-23

打赏
举报

可以静态编译并且带加密功能加群 32143041

dropme 2011-07-22

打赏
举报

[Quote=引用 7 楼 wansuiwht 的回复:]

多谢这位朋友啊。
你的
{$LINK .\obj\_ll.obj}
{$LINK .\obj\strncmp.obj}
{$LINK .\obj\memset.obj}
{$LINK .\obj\memcpy.obj}
{$LINK .\obj\memmove.obj}
{$LINK .\obj\memcmp.obj}

这几个OBJ文件在哪弄的呢。

我编译好了sqlit……
[/Quote]

看你的错误，好像是只声明了，没有实现嘛。你包装的有问题吧~

lyhoo163 2011-07-18

打赏
举报

路过。

仙侣步惊云 2011-07-18

打赏
举报

推荐你用sql anywhere

guduhen 2011-07-12

打赏
举报

听说sqllit不错，准备学习下

山东蓝鸟贵薪 2011-07-12

打赏
举报

占个位置学习学习

chu_czx444 2011-07-12

打赏
举报

这种静态编译，除了数据库加密解密功能没实现外，其它都能用。

Jonix 2011-07-12

打赏
举报

[Quote=引用 12 楼 guduhen 的回复:]

听说sqllit不错，准备学习下
[/Quote]

的确是非常好用，如果能支持存贮过程就好了。
我不喜欢把SQL都编译到执行文件中...

beiguofengguang 2011-07-11

打赏
举报

听说sqllit不错，准备学习下

MyHeroT_MaC 2011-07-11

打赏
举报

学习学习。

orxor 2011-07-08

打赏
举报





function SQLiteFieldType(SQLiteFieldTypeCode: integer): String;

begin

  case SQLiteFieldTypeCode of

    SQLITE_INTEGER:

      Result := 'Integer';

    SQLITE_FLOAT:

      Result := 'Float';

    SQLITE_TEXT:

      Result := 'Text';

    SQLITE_BLOB:

      Result := 'Blob';

    SQLITE_NULL:

      Result := 'Null';

  else

    Result := 'Unknown SQLite Field Type Code "' + IntToStr

      (SQLiteFieldTypeCode) + '"';

  end;

end;



function SQLiteErrorStr(SQLiteErrorCode: integer): String;

begin

  case SQLiteErrorCode of

    SQLITE_OK:

      Result := 'Successful result';

    SQLITE_ERROR:

      Result := 'SQL error or missing database';

    SQLITE_INTERNAL:

      Result := 'An internal logic error in SQLite';

    SQLITE_PERM:

      Result := 'Access permission denied';

    SQLITE_ABORT:

      Result := 'Callback routine requested an abort';

    SQLITE_BUSY:

      Result := 'The database file is locked';

    SQLITE_LOCKED:

      Result := 'A table in the database is locked';

    SQLITE_NOMEM:

      Result := 'A malloc() failed';

    SQLITE_READONLY:

      Result := 'Attempt to write a readonly database';

    SQLITE_INTERRUPT:

      Result := 'Operation terminated by sqlite3_interrupt()';

    SQLITE_IOERR:

      Result := 'Some kind of disk I/O error occurred';

    SQLITE_CORRUPT:

      Result := 'The database disk image is malformed';

    SQLITE_NOTFOUND:

      Result := '(Internal Only) Table or record not found';

    SQLITE_FULL:

      Result := 'Insertion failed because database is full';

    SQLITE_CANTOPEN:

      Result := 'Unable to open the database file';

    SQLITE_PROTOCOL:

      Result := 'Database lock protocol error';

    SQLITE_EMPTY:

      Result := 'Database is empty';

    SQLITE_SCHEMA:

      Result := 'The database schema changed';

    SQLITE_TOOBIG:

      Result := 'Too much data for one row of a table';

    SQLITE_CONSTRAINT:

      Result := 'Abort due to contraint violation';

    SQLITE_MISMATCH:

      Result := 'Data type mismatch';

    SQLITE_MISUSE:

      Result := 'Library used incorrectly';

    SQLITE_NOLFS:

      Result := 'Uses OS features not supported on host';

    SQLITE_AUTH:

      Result := 'Authorization denied';

    SQLITE_FORMAT:

      Result := 'Auxiliary database format error';

    SQLITE_RANGE:

      Result := '2nd parameter to sqlite3_bind out of range';

    SQLITE_NOTADB:

      Result := 'File opened that is not a database file';

    SQLITE_ROW:

      Result := 'sqlite3_step() has another row ready';

    SQLITE_DONE:

      Result := 'sqlite3_step() has finished executing';

  else

    Result := 'Unknown SQLite Error Code "' + IntToStr(SQLiteErrorCode) + '"';

  end;

end;



function ColValueToStr(value: PAnsiChar): String;

begin

  if (value = nil) then

    Result := 'NULL'

  else

    Result := String(PAnsiChar(value));

end;



end.

就是这样的静态链接，没问题啊

orxor 2011-07-08

打赏
举报



unit SQLite3;



{

  Simplified interface for SQLite.

  Updated for Sqlite 3 by Tim Anderson (tim@itwriting.com)

  Update for use with Dbx4Pg by Thiago Borges de Oliveira (thborges at gmail.com)

  Note: NOT COMPLETE for version 3, just minimal functionality

  Adapted from file created by Pablo Pissanetzky (pablo@myhtpc.net)

  which was based on SQLite.pas by Ben Hochstrasser (bhoc@surfeu.ch)

}



interface



const



  // SQLiteDLL = 'sqlite3.dll';



  // Return values for sqlite3_exec() and sqlite3_step()



  __turboFloat: integer = 0;



  SQLITE_OK = 0; // Successful result

  SQLITE_ERROR = 1; // SQL error or missing database

  SQLITE_INTERNAL = 2; // An internal logic error in SQLite

  SQLITE_PERM = 3; // Access permission denied

  SQLITE_ABORT = 4; // Callback routine requested an abort

  SQLITE_BUSY = 5; // The database file is locked

  SQLITE_LOCKED = 6; // A table in the database is locked

  SQLITE_NOMEM = 7; // A malloc() failed

  SQLITE_READONLY = 8; // Attempt to write a readonly database

  SQLITE_INTERRUPT = 9; // Operation terminated by sqlite3_interrupt()

  SQLITE_IOERR = 10; // Some kind of disk I/O error occurred

  SQLITE_CORRUPT = 11; // The database disk image is malformed

  SQLITE_NOTFOUND = 12; // (Internal Only) Table or record not found

  SQLITE_FULL = 13; // Insertion failed because database is full

  SQLITE_CANTOPEN = 14; // Unable to open the database file

  SQLITE_PROTOCOL = 15; // Database lock protocol error

  SQLITE_EMPTY = 16; // Database is empty

  SQLITE_SCHEMA = 17; // The database schema changed

  SQLITE_TOOBIG = 18; // Too much data for one row of a table

  SQLITE_CONSTRAINT = 19; // Abort due to contraint violation

  SQLITE_MISMATCH = 20; // Data type mismatch

  SQLITE_MISUSE = 21; // Library used incorrectly

  SQLITE_NOLFS = 22; // Uses OS features not supported on host

  SQLITE_AUTH = 23; // Authorization denied

  SQLITE_FORMAT = 24; // Auxiliary database format error

  SQLITE_RANGE = 25; // 2nd parameter to sqlite3_bind out of range

  SQLITE_NOTADB = 26; // File opened that is not a database file

  SQLITE_ROW = 100; // sqlite3_step() has another row ready

  SQLITE_DONE = 101; // sqlite3_step() has finished executing



  SQLITE_INTEGER = 1;

  SQLITE_FLOAT = 2;

  SQLITE_TEXT = 3;

  SQLITE_BLOB = 4;

  SQLITE_NULL = 5;



  SQLITE_UTF8 = 1;

  SQLITE_UTF16 = 2;

  SQLITE_UTF16BE = 3;

  SQLITE_UTF16LE = 4;

  SQLITE_ANY = 5;



  SQLITE_TRANSIENT = pointer(-1);

  SQLITE_STATIC = pointer(0);



type

  TSQLiteDB = pointer;

  TSQLiteResult = ^PAnsiChar;

  TSQLiteStmt = pointer;



  // function prototype for define own collate

  TCollateXCompare = function(Userdta: pointer; Buf1Len: integer;

    Buf1: pointer; Buf2Len: integer; Buf2: pointer): integer; cdecl;



function _SQLite3_Open(dbname: PAnsiChar; var db: TSQLiteDB): integer; cdecl;

external;

function _SQLite3_Close(db: TSQLiteDB): integer; cdecl; external;

function _SQLite3_Exec(db: TSQLiteDB; SQLStatement: PAnsiChar;

  CallbackPtr: pointer; Sender: TObject; var ErrMsg: PAnsiChar): integer;

  cdecl; external;

function _SQLite3_Version(): PAnsiChar; cdecl; external;

function _SQLite3_ErrMsg(db: TSQLiteDB): PAnsiChar; cdecl; external;

function _SQLite3_ErrCode(db: TSQLiteDB): integer; cdecl; external;

procedure _SQlite3_Free(P: PAnsiChar); cdecl; external;

function _SQLite3_Get_Table(db: TSQLiteDB; SQLStatement: PAnsiChar;

  var ResultPtr: TSQLiteResult; var RowCount: Cardinal;

  var ColCount: Cardinal; var ErrMsg: PAnsiChar): integer; cdecl; external;

procedure _SQLite3_Free_Table(Table: TSQLiteResult); cdecl; external;

function _SQLite3_Complete(P: PAnsiChar): boolean; cdecl; external;

function _SQLite3_Last_Insert_RowID(db: TSQLiteDB): Int64; cdecl; external;

procedure _SQLite3_Interrupt(db: TSQLiteDB); cdecl; external;

procedure _SQLite3_Busy_Handler(db: TSQLiteDB; CallbackPtr: pointer;

  Sender: TObject); cdecl; external;

procedure _SQLite3_Busy_Timeout(db: TSQLiteDB; TimeOut: integer); cdecl;

external;

function _SQLite3_Changes(db: TSQLiteDB): integer; cdecl; external;

function _SQLite3_Total_Changes(db: TSQLiteDB): integer; cdecl; external;

function _SQLite3_Prepare(db: TSQLiteDB; SQLStatement: PAnsiChar;

  nBytes: integer; var hStmt: TSQLiteStmt; var pzTail: PAnsiChar): integer;

  cdecl; external;

function _SQLite3_Prepare_v2(db: TSQLiteDB; SQLStatement: PAnsiChar;

  nBytes: integer; var hStmt: TSQLiteStmt; var pzTail: PAnsiChar): integer;

  cdecl; external;

function _SQLite3_Column_Count(hStmt: TSQLiteStmt): integer; cdecl; external;

function _Sqlite3_Column_Name(hStmt: TSQLiteStmt; ColNum: integer): PAnsiChar;

  cdecl; external;

function _Sqlite3_Column_DeclType(hStmt: TSQLiteStmt;

  ColNum: integer): PAnsiChar; cdecl; external;

function _Sqlite3_Step(hStmt: TSQLiteStmt): integer; cdecl; external;

function _SQLite3_Data_Count(hStmt: TSQLiteStmt): integer; cdecl; external;



// function _Sqlite3_Column_TableName(hStmt: TSqliteStmt; ColNum: integer): PAnsiChar; cdecl; external;



function _Sqlite3_Column_Blob(hStmt: TSQLiteStmt; ColNum: integer): pointer;

  cdecl; external;

function _Sqlite3_Column_Bytes(hStmt: TSQLiteStmt; ColNum: integer): integer;

  cdecl; external;

function _Sqlite3_Column_Double(hStmt: TSQLiteStmt; ColNum: integer): double;

  cdecl; external;

function _Sqlite3_Column_Int(hStmt: TSQLiteStmt; ColNum: integer): integer;

  cdecl; external;

function _Sqlite3_Column_Text(hStmt: TSQLiteStmt; ColNum: integer): PAnsiChar;

  cdecl; external;

function _Sqlite3_Column_Type(hStmt: TSQLiteStmt; ColNum: integer): integer;

  cdecl; external;

function _Sqlite3_Column_Int64(hStmt: TSQLiteStmt; ColNum: integer): Int64;

  cdecl; external;

function _SQLite3_Finalize(hStmt: TSQLiteStmt): integer; cdecl; external;

function _SQLite3_Reset(hStmt: TSQLiteStmt): integer; cdecl; external;

function _SQLite3_Clear_Bindings(hStmt: TSQLiteStmt): integer; cdecl; external;



//

// In the SQL strings input to sqlite3_prepare() and sqlite3_prepare16(),

// one or more literals can be replace by a wildcard "?" or ":N:" where

// N is an integer.  These value of these wildcard literals can be set

// using the routines listed below.

//

// In every case, the first parameter is a pointer to the sqlite3_stmt

// structure returned from sqlite3_prepare().  The second parameter is the

// index of the wildcard.  The first "?" has an index of 1.  ":N:" wildcards

// use the index N.

//

// The fifth parameter to sqlite3_bind_blob(), sqlite3_bind_text(), and

// sqlite3_bind_text16() is a destructor used to dispose of the BLOB or

// text after SQLite has finished with it.  If the fifth argument is the

// special value SQLITE_STATIC, then the library assumes that the information

// is in static, unmanaged space and does not need to be freed.  If the

// fifth argument has the value SQLITE_TRANSIENT, then SQLite makes its

// own private copy of the data.

//

// The sqlite3_bind_* routine must be called before sqlite3_step() after

// an sqlite3_prepare() or sqlite3_reset().  Unbound wildcards are interpreted

// as NULL.

//



function _SQLite3_Bind_Blob(hStmt: TSQLiteStmt; ParamNum: integer;

  ptrData: pointer; numBytes: integer; ptrDestructor: pointer): integer;

  cdecl; external;

function _SQLite3_Bind_Double(hStmt: TSQLiteStmt; ParamNum: integer;

  Data: double): integer; cdecl; external;

function _SQLite3_Bind_Int(hStmt: TSQLiteStmt; ParamNum: integer;

  intData: integer): integer; cdecl; external;

function _SQLite3_Bind_int64(hStmt: TSQLiteStmt; ParamNum: integer;

  Data: Int64): integer; cdecl; external;

function _SQLite3_Bind_null(hStmt: TSQLiteStmt; ParamNum: integer): integer;

  cdecl; external;

function _SQLite3_Bind_text(hStmt: TSQLiteStmt; ParamNum: integer;

  Data: PAnsiChar; numBytes: integer; ptrDestructor: pointer): integer; cdecl;

external;



function _SQLite3_Bind_Parameter_Index(hStmt: TSQLiteStmt;

  zName: PAnsiChar): integer; cdecl; external;



function _sqlite3_enable_shared_cache(value: integer): integer; cdecl; external;



// user collate definiton

function _sqlite3_create_collation(db: TSQLiteDB; Name: PAnsiChar;

  eTextRep: integer; UserData: pointer; xCompare: TCollateXCompare): integer;

  cdecl; external;



function SQLiteFieldType(SQLiteFieldTypeCode: integer): String;

function SQLiteErrorStr(SQLiteErrorCode: integer): String;



function _atol(const s: PAnsiChar): integer; cdecl;

external 'msvcrt.dll' name 'atol';

function __ftol(f: double): integer; cdecl; external 'msvcrt.dll' name '_ftol';

function __ftoul(f: double): longword; cdecl;

external 'msvcrt.dll' name '_ftol';

function _malloc(s: longword): pointer; cdecl;

external 'msvcrt.dll' name 'malloc';

procedure _free(P: pointer); cdecl; external 'msvcrt.dll' name 'free';

function _realloc(P: pointer; s: longword): pointer; cdecl;

external 'msvcrt.dll' name 'realloc';

function _localtime(const __timer: pointer): pointer; cdecl;

external 'msvcrt.dll' name 'localtime';



implementation



uses

  Windows, SysUtils;

{$LINK .\obj\sqlite3.obj}

{$LINK .\obj\_ll.obj}

{$LINK .\obj\strncmp.obj}

{$LINK .\obj\memset.obj}

{$LINK .\obj\memcpy.obj}

{$LINK .\obj\memmove.obj}

{$LINK .\obj\memcmp.obj}

wansuiwht 2011-07-08

打赏
举报

多谢这位朋友啊。
你的
{$LINK .\obj\_ll.obj}
{$LINK .\obj\strncmp.obj}
{$LINK .\obj\memset.obj}
{$LINK .\obj\memcpy.obj}
{$LINK .\obj\memmove.obj}
{$LINK .\obj\memcmp.obj}

这几个OBJ文件在哪弄的呢。

我编译好了sqlite3.obj就是调用时报好多错。
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: '__ftol'
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: '__lldiv'
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: '__llmod'
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: '_localtime'
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: '_memset'
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: '_strcmp'
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: '_strncmp'
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: '__llmul'
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: '_malloc'
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: '_free'
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: '_realloc'
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: '_memcpy'
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: 'InterlockedCompareExchange'
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: 'InitializeCriticalSection'
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: 'Sleep'
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: 'DeleteCriticalSection'
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: 'EnterCriticalSection'
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: 'LeaveCriticalSection'
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: '__llumod'
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: '__lludiv'
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: '_memmove'
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: 'GetVersionExA'
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: 'MultiByteToWideChar'
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: 'WideCharToMultiByte'
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: 'AreFileApisANSI'
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: 'FormatMessageW'
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: 'LocalFree'
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: 'FormatMessageA'
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: 'SetFilePointer'
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: 'CloseHandle'
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: 'ReadFile'
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: 'WriteFile'
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: 'SetEndOfFile'
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: 'FlushFileBuffers'
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: 'GetFileSize'
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: 'LockFileEx'
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: 'LockFile'
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: 'UnlockFile'
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: 'UnlockFileEx'
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: 'UnmapViewOfFile'
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: 'CreateFileMappingA'
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: 'MapViewOfFile'
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: 'GetTempPathW'
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: 'GetTempPathA'
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: 'CreateFileW'
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: 'CreateFileA'
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: 'DeleteFileW'
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: 'GetFileAttributesW'
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: 'DeleteFileA'
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: 'GetFileAttributesA'
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: 'GetFileAttributesExW'
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: 'GetFullPathNameW'
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: 'GetFullPathNameA'
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: 'GetDiskFreeSpaceW'
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: 'GetDiskFreeSpaceA'
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: 'LoadLibraryW'
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: 'LoadLibraryA'
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: 'GetProcAddress'
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: 'FreeLibrary'
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: 'GetSystemTime'
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: 'GetCurrentProcessId'
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: 'GetTickCount'
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: 'QueryPerformanceCounter'
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: 'GetSystemTimeAsFileTime'
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: 'GetSystemInfo'
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: '_memcmp'
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: '__llshl'
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: '__llushr'
[Error] sqlite.pas(32775): Unsatisfied forward or external declaration: '__turboFloat'
[Fatal Error] Project1.dpr(6): Could not compile used unit 'sqlite.pas'

[Quote=引用 5 楼 orxor 的回复:]
Delphi(Pascal) code

unit SQLite3;

{
Simplified interface for SQLite.
Updated for Sqlite 3 by Tim Anderson (tim@itwriting.com)
Update for use with Dbx4Pg by Thiago Borges de Oliveira (th……
[/Quote]

dinoalex 2011-07-07

打赏
举报

静态连?

加载更多回复（3）

delphi + sqlite3

相关推荐