Страница 1 из 1

Экспорт датасета в csv. Возвращает пустой файл

Добавлено: 12 авг 2007, 14:56
Pavel_ch
Собственно проблема в названии темы. Вопреки рекомендациям http://www.ibase.ru/devinfo/ibx.htm использую всё же не TIBSQL, а TIBQuery, т.к. есть пара вычисляемых в клиентском приложении полей. Код такой:

Код: Выделить всё

procedure TReportsFrm.BitBtn1Click(Sender: TObject);
var OutFile: TIBOutputDelimitedFile;
begin
  OutFile:=TIBOutputDelimitedFile.Create;
  OutFile.Filename:='MyCSV.csv';
  OutFile.ColDelimiter:=';';
  MyIBQuery.BatchOutput(OutFile);
  OutFile.Free;
end;
В результате получаем пустой файл размером 0 байт.

Windows XP SP2, BDS2006 (IBX тот который шёл вместе с BDS), Interbase 7.0.1

Добавлено: 15 авг 2007, 17:24
kdv
Вопреки рекомендациям
это ваше личное дело.
IBX тот который шёл вместе с BDS
я бы обновил. в среде вечно идет глюкавый ibx.
В результате получаем пустой файл размером 0 байт.
тогда пройти отладчиком по коду batchoutput. мне кажется или с запросом что-то не то, или ...

Добавлено: 15 авг 2007, 19:42
Pavel_ch
Уже решил проблему, накатал свою прцедурку, благо csv-дело нехитрое.