Вывод в Excel

[Anastasia12.02.]

Здравствуйте!
Подскажите, пожалуйста, как вывести в Excel 3 столбца из таблицы (в таблице 5 столбцов).
Данные столбцы нужно вывести в определенный диапазон ячеек. Причем таблица будет расти, и диапазон увеличиваться.
Заранее спасибо!

[Anastasia12.02.]

Если поможет, БД MySQL. Подключаюсь к БД через AdoQuery.
Не могу сообразить, как вывести только определенные столбцы.
К примеру столбец name в диапазон ячеек С3-С20, столбец syrname в D3-D20, столбец patronymic в F3-F20.
Выручите, пожалуйста!

[eval]

затруднения в чем?

[Anastasia12.02.]

Затруднение в том, что я вывожу только одну строку

procedure TForm4.btn2Click(Sender: TObject);
var xls:variant;
begin
xls := CreateOLEObject('Excel.Application');
xls.WorkBooks.Open(FileName := 'c\Program Files (x86)\naklad.xls');
xls.Visible:=True;
xls.DisplayAlerts := False;
Form10.qry1.Open;

xls.Range['CX24']:=Form10.qry1.FieldByName('name').AsString;
xls.Range['CC24']:=Form10.qry1.FieldByName('syrname').AsString;
xls.Range['K24']:=Form10.qry1.FieldByName('patronymic').AsString;

xls.Visible := true;
end;

Если в Range писать диапазон ячеек, то выводит одну и туже строку во все ячейки.
Как сделать, чтобы выводились все строки?
И как сделать, чтобы диапазон ячеек не редактировался? К примеру, сегодня вывожу 3 строки, а завтра уже добавила запись и надо вывести 4 строки.

[Anastasia12.02.]

Никто не знает решение проблемы???

[Streletz]

Затруднение в том, что я вывожу только одну строку

А, кто обход строк DataSet'а делать будет? Сама по себе позиция при чтении DataSet'а не изменяется.

[Anastasia12.02.]

Сообщение от Streletz

А, кто обход строк DataSet'а делать будет? Сама по себе позиция при чтении DataSet'а не изменяется.

А как сделать???

[Streletz]

repeat
  xls.Range['CX'+IntToStr(strNum)]:=Form10.qry1.FieldByName('name').AsString;
  xls.Range['CC'+IntToStr(strNum)]:=Form10.qry1.FieldByName('syrname').AsString;
  xls.Range['K'+IntToStr(strNum)]:=Form10.qry1.FieldByName('patronymic').AsString;
  inc(strNum);
until
  Form10.qry1.Next=true;

Приблизительно, как-то так.
Код я писал прямо на форуме, что называется "на вскидку". Поэтому, не проверял.

[Anastasia12.02.]

Streletz, тогда следующая строка будет в ячейках CX25, CC25, K25?

[Streletz]

тогда следующая строка будет в ячейках CX25, CC25, K25?

О перемещении по строкам Excel, тоже нужно позаботиться.
Вверху я не много поправил код, однако всё равно нужна проверка.