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

Вниз

OLE: OpenText и Dialog.Show в Excel.Workbooks   Найти похожие ветки 

 
Sandman   (2003-02-28 11:28) [0]

Здравствуйте.

Нужно сохранять в формате xls данные из файла отчета БД.
Используется Delphi 6 и Excel2000.pas
Если пишу напрямую:
Excel.Workbooks.OpenText(FileName, xlMSDOS, 1,
xlDelimited,xlTextQualifierNone, false, false,
false, false, false, true, "|", FieldInfo,
0,".",",",0)
то все работает, файл читается. (Excel имеет тип TExcelApplication)
А вот если я хочу использовать диалог, чтобы дать пользователю возможность указать формат файла (считать файл не с разделителями, а со строками фиксированной длины, например), то программа вылетает по ошибке.
Я пишу:
Excel.Dialogs.Item[xlDialogOpenText].Show(FileName, xlMSDOS, 1,
xlDelimited,xlTextQualifierNone, false, false,
false, false, false, true, "|", FieldInfo,
0,".",",",0,null,null,null,null,null,
null,null,null,null,null,null,null,null);
Возможно, я неверно записываю последние (неиспользуемые) параметры метода. Я пробовал писать 0 вместо null, но результат был тот же. Пробовал и конструкцию, где все параметры, кроме первого (имени файла), были null - таким образом я пытался заставить Excel подобрать значения автоматически, как это происходит при попытке открытия файла вручную.

Еще один вопрос - что означает параметр lcid типа integer в методах Excel.TextOpen, Excel.ActiveWorkBook.SaveCopyAs, Excel.ActiveWorkBook.Close И т.д. А то использовать - использую (ставлю 0), а смысла не понимаю. И смех, и грех :-)

Буду очень признателен за любую помощь.


 
Sandman   (2003-02-28 16:19) [1]

Наконец-то нашел хороший учебник по Excel компонентам.
http://www.afalinasoft.com/rus/tips/index.html
Теперь ясно, что использовать в качестве lcid :)



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

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

Наверх




Память: 0.47 MB
Время: 0.012 c
3-29698
Kalishenko Stas
2003-02-18 12:02
2003.03.10
DBGrid


14-30076
Паша
2003-02-21 17:09
2003.03.10
Чему учат в школе?


1-29880
Michael Makushev
2003-02-26 10:27
2003.03.10
Парсер


7-30163
Drex
2003-01-08 09:27
2003.03.10
Как проверить наличие в системе портов LPT1 и LPT2 ?


3-29756
jen_bond
2003-02-19 16:02
2003.03.10
DBctrlGrid