Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.05.13;
Скачать: CL | DM;

Вниз

экспорт из IBQuery в Excel   Найти похожие ветки 

 
merko$ ©   (2007-02-21 08:28) [0]

Уважаемые Мастера, подскажите пожалуйста как правильно сделать цикл чтоб результат запроса 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);


 
Кщд ©   (2007-02-21 08:46) [1]

with IBQuery1 do while not Eof do  
begin
ExcelWorksheet1.Cells.Item[2+i,3].Value:=fOtRem.IBQuery1.FieldValues["DATA_REM"];
Next; Inc(i);
end;


 
merko$ ©   (2007-02-21 09:03) [2]

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 09:18) [3]

можно first поставить
а вообще, программирование это так заумно и утомительно - пойду-ка лучше в дворники


 
merko$ ©   (2007-02-21 09:36) [4]

Ошибка: Interfase not supported


 
merko$ ©   (2007-02-21 09:39) [5]

А если экспортировать из IBTable то все работает


 
merko$ ©   (2007-02-21 11:46) [6]

Есть у ково-нибудь соображения по данному вопросу?


 
Val ©   (2007-02-21 12:00) [7]

Есть. У человека, написавшего статьи "По волнам интеграции" на королевстве, как минимум. Очень советую.



Страницы: 1 вся ветка

Текущий архив: 2007.05.13;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.036 c
2-1176990297
redlord
2007-04-19 17:44
2007.05.13
функция возвращающая УНИКАЛЬНОЕ число


2-1177445212
Alexdeil
2007-04-25 00:06
2007.05.13
Мерцание Image


15-1176642479
Knight
2007-04-15 17:07
2007.05.13
Смотрю видео через Paint&#133


6-1162213016
arefart
2006-10-30 15:56
2007.05.13
Перехват пакетов


3-1172558403
Merry
2007-02-27 09:40
2007.05.13
Запрос на отбор данных с пустым значенем