disqlite3api.hpp

来自「DELPHI 访问SQLITE3 数据库的VCL控件」· HPP 代码 · 共 515 行 · 第 1/3 页

// Borland C++ Builder
// Copyright (c) 1995, 2004 by Borland Software Corporation
// All rights reserved

// (DO NOT EDIT: machine generated header) 'Disqlite3api.pas' rev: 6.00

#ifndef Disqlite3apiHPP
#define Disqlite3apiHPP

#pragma delphiheader begin
#pragma option push -w-
#pragma option push -Vx
#include <Sysutils.hpp>	// Pascal unit
#include <Sysinit.hpp>	// Pascal unit
#include <System.hpp>	// Pascal unit

//-- user supplied -----------------------------------------------------------

namespace Disqlite3api
{
//-- type declarations -------------------------------------------------------
class DELPHICLASS ESQLite3;
class PASCALIMPLEMENTATION ESQLite3 : public Sysutils::Exception 
{
	typedef Sysutils::Exception inherited;
	
private:
	int FErrorCode;
	AnsiString FErrorMessage;
	
public:
	__fastcall ESQLite3(const int AErrorCode, const AnsiString AErrorMessage)/* overload */;
	__fastcall ESQLite3(const int AErrorCode)/* overload */;
	__fastcall ESQLite3(const AnsiString AErrorMessage)/* overload */;
	__property int ErrorCode = {read=FErrorCode, nodefault};
	__property AnsiString ErrorMessage = {read=FErrorMessage};
public:
	#pragma option push -w-inl
	/* Exception.CreateFmt */ inline __fastcall ESQLite3(const AnsiString Msg, const System::TVarRec * Args, const int Args_Size) : Sysutils::Exception(Msg, Args, Args_Size) { }
	#pragma option pop
	#pragma option push -w-inl
	/* Exception.CreateRes */ inline __fastcall ESQLite3(int Ident)/* overload */ : Sysutils::Exception(Ident) { }
	#pragma option pop
	#pragma option push -w-inl
	/* Exception.CreateResFmt */ inline __fastcall ESQLite3(int Ident, const System::TVarRec * Args, const int Args_Size)/* overload */ : Sysutils::Exception(Ident, Args, Args_Size) { }
	#pragma option pop
	#pragma option push -w-inl
	/* Exception.CreateHelp */ inline __fastcall ESQLite3(const AnsiString Msg, int AHelpContext) : Sysutils::Exception(Msg, AHelpContext) { }
	#pragma option pop
	#pragma option push -w-inl
	/* Exception.CreateFmtHelp */ inline __fastcall ESQLite3(const AnsiString Msg, const System::TVarRec * Args, const int Args_Size, int AHelpContext) : Sysutils::Exception(Msg, Args, Args_Size, AHelpContext) { }
	#pragma option pop
	#pragma option push -w-inl
	/* Exception.CreateResHelp */ inline __fastcall ESQLite3(int Ident, int AHelpContext)/* overload */ : Sysutils::Exception(Ident, AHelpContext) { }
	#pragma option pop
	#pragma option push -w-inl
	/* Exception.CreateResFmtHelp */ inline __fastcall ESQLite3(System::PResStringRec ResStringRec, const System::TVarRec * Args, const int Args_Size, int AHelpContext)/* overload */ : Sysutils::Exception(ResStringRec, Args, Args_Size, AHelpContext) { }
	#pragma option pop
	
public:
	#pragma option push -w-inl
	/* TObject.Destroy */ inline __fastcall virtual ~ESQLite3(void) { }
	#pragma option pop
	
};


typedef char *TPAnsiCharArray[536870911];

typedef char * *PPAnsiCharArray;

typedef TDIJulianDate TDIJulianDate;

typedef void *TDISQLite3DatabaseHandle;

typedef TDISQLite3DatabaseHandle *PDISQLite3DatabaseHandle;

typedef void *TDISQLite3StatementHandle;

typedef TDISQLite3StatementHandle *PDISQLite3StatementHandle;

typedef int __fastcall (*TSQLite3_Callback)(void * UserData, int ColumnCount, PPAnsiCharArray ColumnValues, PPAnsiCharArray ColumnNames);

typedef int __fastcall (*TSQLite3_Busy_Callback)(void * p, int i);

typedef int __fastcall (*TSQLite_Authorizer_Callback)(void * UserData, int Arg2, char * Arg3, char * Arg4, char * Arg5, char * Arg6);

typedef void __fastcall (*TSQLite_Trace_Callback)(void * UserData, const char * SQL);

typedef void __fastcall (*TSQLite_Profile_Callback)(void * UserData, const char * SQL, __int64 elapseTime);

typedef int __fastcall (*TSQLite3_Progress_Callback)(void * UserData);

typedef int __fastcall (*TSQLite_Commit_Callback)(void * UserData);

typedef void __fastcall (*TSQLite_Destructor)(void * p);

typedef void __fastcall (*TSQLite_Bind_Destructor)(void * p);

typedef void __fastcall (*TSQLite_Result_Destructor)(void * p);

typedef void __fastcall (*TSQLite_Func_Callback)(void * Context, int nArgs, System::PPointerArray Args);

typedef TSQLite_Func_Callback *PSQLite_Func_Callback;

typedef void __fastcall (*TSQLite_Step_Callback)(void * Context, int nArgs, System::PPointerArray Args);

typedef void __fastcall (*TSQLite_Final_Callback)(void * Context);

typedef void __fastcall (*TSQLite_AuxData_Destructor)(void * p);

typedef int __fastcall (*TSQLite_Collation_Callback)(void * UserData, int l1, const void * s1, int l2, const void * s2);

typedef void __fastcall (*TSQLite_Collation_Needed_Callback)(void * UserData, TDISQLite3DatabaseHandle DB, int eTextRep, char * Name);

typedef void __fastcall (*TSQLite_Collation_Needed16_Callback)(void * UserData, TDISQLite3DatabaseHandle DB, int eTextRep, WideChar * Name);

typedef void __fastcall (*TSQLite3_Update_Callback)(void * UserData, int Operation, TDISQLite3DatabaseHandle DB, char * TableName, __int64 RowID);

typedef void __fastcall (*TSQLite3_Rollback_Callback)(void * UserData);

struct TSQLite3_vtab;
typedef TSQLite3_vtab *PSQLite3_vtab;

typedef PSQLite3_vtab *PPSQLite3_vtab;

struct TSQLite3_index_info;
typedef TSQLite3_index_info *psqlite3_index_info;

#pragma pack(push, 4)
struct Tsqlite3_vtab_cursor
{
	TSQLite3_vtab *pvtab;
} ;
#pragma pack(pop)

typedef Tsqlite3_vtab_cursor *Psqlite3_vtab_cursor;

typedef Psqlite3_vtab_cursor *PPsqlite3_vtab_cursor;

#pragma pack(push, 4)
struct TSQLite3_Module
{
	int iVersion;
	int __fastcall (*xcreate)(TDISQLite3DatabaseHandle DB, void * paux, int argc, const PPAnsiCharArray argv, PPSQLite3_vtab pvtab, System::PPChar pzErr);
	int __fastcall (*xConnect)(TDISQLite3DatabaseHandle DB, void * paux, int argc, const PPAnsiCharArray argv, PPSQLite3_vtab pvtab, System::PPChar pzErr);
	int __fastcall (*xBestIndex)(PSQLite3_vtab pvtab, psqlite3_index_info Info);
	int __fastcall (*xDisconnect)(PSQLite3_vtab pvtab);
	int __fastcall (*xDestroy)(PSQLite3_vtab pvtab);
	int __fastcall (*xOpen)(PSQLite3_vtab pvtab, PPsqlite3_vtab_cursor ppCursor);
	int __fastcall (*xClose)(Psqlite3_vtab_cursor pCursor);
	int __fastcall (*xFilter)(Psqlite3_vtab_cursor pCursor, int idxNum, char * idxStr, int argc, System::PPointerArray argv);
	int __fastcall (*xNext)(Psqlite3_vtab_cursor pCursor);
	int __fastcall (*xEof)(Psqlite3_vtab_cursor pCursor);
	int __fastcall (*xColumn)(Psqlite3_vtab_cursor pCursor, void * Context, int i);
	int __fastcall (*xRowID)(Psqlite3_vtab_cursor pCursor, System::PInt64 pRowID);
	int __fastcall (*xUpdate)(PSQLite3_vtab pvtab, int argc, System::PPointerArray argv, System::PInt64 pRowID);
	int __fastcall (*xBegin)(PSQLite3_vtab pvtab);
	int __fastcall (*xSync)(PSQLite3_vtab pvtab);
	int __fastcall (*xCommit)(PSQLite3_vtab pvtab);
	int __fastcall (*xRollback)(PSQLite3_vtab pvtab);
	int __fastcall (*xFindFunction)(PSQLite3_vtab pvtab, int nArg, char * zName, PSQLite_Func_Callback pxFunc, System::PPointerArray ppArg);
} ;
#pragma pack(pop)

typedef TSQLite3_Module *psqlite3_module;

#pragma pack(push, 4)
struct TSQLite3_vtab
{
	TSQLite3_Module *pModule;
	int nRef;