Главная страница
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.021 c
7-30165
NorthMan
2003-01-12 19:09
2003.03.10
мне нужно запустить прогу от имени системы,


3-29747
roadrunner
2003-02-19 10:17
2003.03.10
Помогите разобраться с АДО и БДЕ


14-30129
Killer2k
2003-02-23 17:04
2003.03.10
Please!!! Help me!!!


1-29826
mixamixa
2003-02-28 04:09
2003.03.10
TMemoryStream


8-29963
Novichek
2002-11-20 19:07
2003.03.10
Flash