Есть база данных SQLite для подключения к которой использую Delphi XE8 и FireDAC. Нужно запросить данные из трех таблиц бд и сохранить в три переменные для последующей обработки, но мой код каждый раз перезаписывает данные.
Я пробовал копировать данные в разные FDMemTable, добавлял для каждой таблицы свой FDQuery, но по непонятным мне причинам данные каждый раз перезаписываются ответом на последний запрос. Как мне отвязать переменные с ответом сервера от FDQuery?
Вот нарисовал схему того как должно работать, для большей наглядности:
Вот мой код:
FDConnection:=TFDConnection.Create(nil);
FDConnection.DriverName:='SQLite';
FDConnection.LoginPrompt:=False;
FDConnection.FormatOptions.MapRules.Add(dtWideMemo, dtWideString);
dbPages:=TFDMemTable.Create(nil);
dbFields:=TFDMemTable.Create(nil);
PageQuery:=TFDQuery.Create(nil);
PageQuery.Connection:=FDConnection;
FieldQuery:=TFDQuery.Create(nil);
FieldQuery.Connection:=FDConnection;
FDConnection.Params.Database:='C:\Users\Wizard\Desktop\project1.db';
FDConnection.Connected:=True;
PageQuery.Open('SELECT * FROM pages');
dbPages.Data:=PageQuery.Data;
FieldQuery.Open('SELECT * FROM fields');
dbFields.Data:=FieldQuery.Data;
Код рабочий, подскажите, вот такая конструкция по идее связывает FieldQuery и dbFields:
dbFields.Data:=FieldQuery.Data;
когда я делаю другой запрос в FieldQuery данные в dbFields тоже перезаписываются. Как одноразово передать данные из FieldQuery в dbFields?
SELECT
ничего не возвращает. Пустая БД?TFDMemTable
.PageQuery.FetchAll;
перед присвоением (см. пример в доках).