VPF::Работа с MS Excel - Форум программистов

wesadex

Дата 7.11.2006, 11:09 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 83
Регистрация: 21.6.2005

Репутация: нет
Всего: нет

Всем привет!

Покорырялся в drkb и понял одно: чтобы открыть xls файло надо знать версию MS Office.
Требуется открывать много xls файлов, созданных разными версиями Office на компах с разными установленными версиями Office (от 2000 до 2003 как минимум), но так, чтобы юзеру не приходилось выбирать руками версию Office - ибо ламерье одно и не то, чтобы версию офиса знать, некоторые даже блокнотом пользоваться не умеют.

Лично я вижу один вариант (но возможно что я чего-то не знаю):
* как-то узнавать версию офиса по case Version of использовать нужную функцию открытия файла. Но тут есть один вопрос: Как узнать версию офиса установленного на машине? Если можно с примерами.

Если есть еще какие-то варианты: например какая-то универсальная функция открытия - буду опять же крайне благодарен за примеры.

p.s. Функцию сохранения результата в Excel не смотрел, но думается мне там та же ситуация? Если да, то за примеры и тут буду благодарен. smile

Elfebet

Дата 7.11.2006, 11:14 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 545
Регистрация: 15.5.2006
Где: Украина. Запорожь е.

Репутация: нет
Всего: 14

Цитата

Покорырялся в drkb и понял одно: чтобы открыть xls файло надо знать версию MS Office.

кто это тебе надоумел?. Главное стобы Excel был, а не версия офиса.

Код


var Excel, WorkBook, Sheet: Variant; 
begin 
 Excel := CreateOleObject('Excel.Application');  
 Excel.WorkBooks.Open(FileName,False);  
 WorkBook := Excel.WorkBooks.Item[1];  
 Sheet := Workbook.Sheets.Item[3];  
 Sheet.Cells[1,2]:='ASDFG';  
 Sheet.Cells[2,2]:=230;

Это сообщение отредактировал(а) Elfebet - 7.11.2006, 11:16

--------------------

Программист не должен всё знать... он должен знать где можно посмотреть

wesadex

Дата 7.11.2006, 11:23 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 83
Регистрация: 21.6.2005

Репутация: нет
Всего: нет

Значит я чего-то где-то недочитал или недоглядел. Прошу прощения! smile

За кусок кода спасибо!

Albinos_x

Дата 7.11.2006, 11:29 (ссылка)

(нет голосов)

Загрузка ...

Evil Skynet

Профиль
Группа: Комодератор
Сообщений: 3288
Регистрация: 28.5.2004
Где: X-6120400 Y-1 4624650

Репутация: 15
Всего: 108

читаем мою статью:
http://forum.vingrad.ru/topic-84634/view/all/index.html
там всё достаточно подробно написано...

--------------------

"Кто владеет информацией, тот владеет миром"
Уинстон Черчилль

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: ActiveX/СОМ/CORBA \| Следующая тема »