void __fastcall TForm1::TestBase()
{
sqlite3 *db;
sqlite3_stmt * pStmt;
char *sql[] = {	
		"BEGIN TRANSACTION;",
                "CREATE TABLE t1(x1 INTEGER,x2 INTEGER);",
                "insert into t1 (x1 ,x2 ) values (1,1);",
		"insert into t1(x1 ,x2 ) values (2,2);",
                "SELECT  load_extension('libsqlitefunctions.dll') ;",//подгружаю библиртеку с математическими функциями
		"insert into t1 ( x1, x2) select  square  (x1),x2 from Upd;",//ругется на square(возведение в квадрат) она находится в libsqlitefunctions.dll
		"COMMIT;"
              };
if (sqlite3_open("test.db", &db))
        sqlite3_close(db);
//пытался вставлять sqlite3_load_extension(db,"libsqlitefunctions.dll",0,0); результат тот же
for (i=0; i<sizeof(sql)/sizeof(sql[0]); i++)
        {
        if (sqlite3_prepare(db, sql[i], -1, &pStmt, NULL))
                {
                sqlite3_finalize(pStmt);
                sqlite3_close(db);
                }
        sqlite3_step(pStmt);
        sqlite3_finalize(pStmt);
        }
sqlite3_close(db);
}