MAR

Это просто какой- то праздник жизни !!!

Tokyo заявляет, что no such function: ....

// предок
  inherited Create();

  // сохраняем себе БД
  db := @base;

  // соединение с драйвером
  drvLink := TFDPhysSQLiteDriverLink.Create(Nil);

  // создаём функцию для регистрации соединения
  sqlRegisterConnection := TFDSQLiteFunction.Create(Nil);
  // задаём имя
  sqlRegisterConnection.FunctionName := 'rConn';
  // количество аргументов
  sqlRegisterConnection.ArgumentsCount := 2;
  // присваиваем обработчик
  sqlRegisterConnection.OnCalculate := onCalculateConnectionRegister;
  // активность функции
  sqlRegisterConnection.Active := True;

А потом жду- не дождусь вызова onCalculateConnectionRegister...

Отваливает в Exception при Open SQL запроса...

Типа SELECT rConn(1,1) LIMIT 1;

Error (0): [FireDAC][Phys][SQLite] ERROR: no such function: rConn

Вопрос отменяется.

Как всегда документация говорит одно, код- другое, подразумевается третье.

Для Tokyo актуален заголовок

// запуск встроенной функции регистрации соединения
    Procedure onCalculateConnectionRegister(AFunc: TSQLiteFunctionInstance;
      AInputs: TSQLiteInputs; AOutput: TSQLiteOutput; var AUserData: TObject);

В примере невнимательно посмотрел. )))

Хотя в официозе в примере:

http://docwiki.embarcadero.com/CodeExamples/Tokyo/en/FireDAC.SQLite_Sample

procedure TfrmGettingStarted.sqlFunctionCalculate(AFunc: TSQLiteFunction;
  AInputs: TSQLiteInputs; AOutput: TSQLiteOutput; var AUserData: TObject);

В 22.07.2016 в 18:05, Кривяков Виталий сказал:

Не вопрос.

SQLITE.zip

Сделал по образу и подобию.

Кричит:

[dcc32 Error] clueDBWrapper.pas(537): E2010 Incompatible types: 'TSQLiteFunctionInstance' and 'TSQLiteFunction'

Чую, что собака порылась в том, что в примере есть instance Form1, а у меня класс на данный момент в "свободном полёте".

Тут можно как- то выкрутиться ?