Вверх ↑
Ответов: 2059
Рейтинг: 132
#1: 2020-04-25 16:18:46 ЛС | профиль | цитата
Aziz писал(а):
Я так понял их нужно заменить функциями sqlite3.dll

Да, надо заменить, это для примера.
Не парся, SqLite3Api.pas через жопу сделан, а вернее скоммунизден:


{$IFDEF SQLITE_OBJ}

uses Windows;

{$ifDEF 3_3_4_OBJ}
{$L 'SQLiteObj\sqlite3_3_4.obj'}
{$ELSE}
{$ifDEF 3_7_2_OBJ}
{$L 'SQLiteObj\sqlite3_7_2.obj'}
{$ELSE}
{$L 'SQLiteObj\sqlite3_4_2.obj'}
{$ENDIF 3_7_2_OBJ}
{$ENDIF 3_3_4_OBJ}
{$L 'SQLiteObj\_ll.obj'}
{$L 'SQLiteObj\_ftoul.obj'}
{$L 'SQLiteObj\ftol.obj'}
{$L 'SQLiteObj\memmove.obj'}
{$L 'SQLiteObj\qsort.obj'}


там вот так функции объявляются:
interface
...
SQLITEDLL = 'sqlite3.dll';
...
function sqlite3_libVersion(): PChar; cdecl;
...
implementation
function sqlite3_libVersion; external SQLITEDLL;

Я сейчас на кухне ремонт делаю, потом время будет сделаю.
карма: 6

0
Редактировалось 4 раз(а), последний 2020-04-25 16:23:47