![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
экспорт из IBQuery в Excel [D6, D7, IB6.x]
merko$ © (2007-02-21 08:28:00)Уважаемые Мастера, подскажите пожалуйста как правильно сделать цикл чтоб результат запроса IBQuery экспортировался весь в Excel, (т.е. все записи), а не только первая запись?
Заранее благодарю!
Пробовал сделать так но не получается
var
i:integer;
begin
with IBQuery1 do while not Eof do
ExcelWorksheet1.Cells.Item[2+i,3].Value:=fOtRem.IBQuery1.FieldValues['DATA_REM'];
Next; Inc(i);
Val (2007-02-21 12:00:00) [1]Есть. У человека, написавшего статьи "По волнам интеграции" на королевстве, как минимум. Очень советую.
merko$ (2007-02-21 11:46:00) [2]Есть у ково-нибудь соображения по данному вопросу?
merko$ (2007-02-21 09:39:00) [3]А если экспортировать из IBTable то все работает
merko$ (2007-02-21 09:36:00) [4]Ошибка: Interfase not supported
Кщд (2007-02-21 09:18:00) [5]можно first поставить
а вообще, программирование это так заумно и утомительно - пойду-ка лучше в дворники
merko$ (2007-02-21 09:03:00) [6]with IBQuery1 do while not Eof do
begin
ExcelWorksheet1.Cells.Item[2+i,3].Value:=fOtRem.IBQuery1.FieldValues['DATA_REM'];
Next; Inc(i);
end;
Не работает, ошибка!
Кщд (2007-02-21 08:46:00) [7]with IBQuery1 do while not Eof do
begin
ExcelWorksheet1.Cells.Item[2+i,3].Value:=fOtRem.IBQuery1.FieldValues['DATA_REM'];
Next; Inc(i);
end;