Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2003.03.10;
Скачать: [xml.tar.bz2];

Вниз

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;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.44 MB
Время: 0.01 c
14-30115
GebbelZ
2003-02-23 02:57
2003.03.10
MS Internet Explorer


3-29755
phantom2040
2003-02-19 16:12
2003.03.10
Помогите с паролями для таблицы Парадокс


6-29979
Kikimora
2003-01-22 00:01
2003.03.10
Проблема с TClientSocket


3-29783
TAN
2003-02-20 12:18
2003.03.10
MySQL и SQLConnection


14-30018
Amit
2003-02-24 10:03
2003.03.10
It s cool! Верно...





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский