Значение с базы данных , Запрос к базе данных SQL

[Myrus]

Добрый день.
Подключился к базе данных SQL, проблем не возникло.
Не получается получить правильно результат.

Делаю запрос к базе данных. Для понимания результата что получаю попробовал вывести результат в Memo.

var
  i: integer;
  s : string;
begin
  with FDQuery1 do begin
  SQL.Clear;
  Open;
  Memo1.Lines.Clear;
  First;
  while not FDQuery1.EOF do
  begin
    s := '';
    For i := 0 to Fields.Count - 1 do
    s := s + Fields[i].AsString;
    memo1.Lines.Add(Fields[0].Value);
    Next;
  end;
  Close;
  end;
end;

Помогите пожалуйста с данной проблемой. Оформить в одну процедуру.

Сообщение отредактировано: Myrus - 08.01.18, 20:25

[MIF]

Используй курсор https://docs.microsoft.com/en-us/sql/t-sql/...or-transact-sql

[Myrus]

Никогда с ними не работал, статью посмотрел, для меня сложно с таким разобраться.

[Myrus]

Хелп