Добрый день.
Подключился к базе данных SQLite, проблем не возникло.
Не получается получить правильно результат.
Делаю запрос к базе данных. Для понимания результата что получаю попробовал вывести результат в Memo.
Код:
i: integer;
s : string;
begin
with FDQuery1 do begin
SQL.Clear;
SQL.Text := 'SELECT DISTINCT SYSKEY FROM SYS_OPT_EXT SYSOP WHERE BLOCK_ID = ''22''';
Open;
Memo1.Lines.Clear;
First;
while not FDQuery1.EOF do
begin
For i := 0 to Fields.Count - 1 do
memo1.Lines.Add(Fields[0].Value);
Next;
end;
Close;
end;
end;
Получил результаты:
Код:
2200
2217
2218
2231
2232
2266
2267
22001900
22006300
22006400
22007600
22009400
Админ: тег код используется для кода, цитаты для цитат, не нужно путать...
Теперь мне нужно каждый из полученных результатов каким-то образом прогнать в цикле следующего запроса таблицы ID, но только исключить из цикла проверка с числом 2266(там будет результат, но не то что мне надо)
Цитата:
SELECT MUTCLASS FROM MUTCLASS_EXT WHERE BLOCK_ID = 1107760020 AND ID = 2267
|
В Edit1.Text нужно вывести результат. Прежде Исключить все пустые значения.
Помогите пожалуйста с данной проблемой. Оформить в одну процедуру.