Форум на Исходниках.RU

Форум на Исходниках.RU https://forum.sources.ru Форум на Исходниках.RU Форум на Исходниках.RU https://forum.sources.ru/index.php?showtopic=347684&view=findpost&p=3857531 Tue, 11 Jan 2022 07:14:05 +0000 работа с Excel в XE2 https://forum.sources.ru/index.php?showtopic=347684&view=findpost&p=3857531
привести указатель к типу OleVariant

void TFExcel::toExcelCell(int Row,int Column, AnsiString data)

{

try {

Sh.OlePropertyGet("Cells", Row,Column).OlePropertySet("Value", (OleVariant)data.c_str());

} catch(...) {

;

}

]]> Vix Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=347684&view=findpost&p=3066323 Wed, 25 Jan 2012 03:50:01 +0000 работа с Excel в XE2 https://forum.sources.ru/index.php?showtopic=347684&view=findpost&p=3066323 vepdl Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=347684&view=findpost&p=3066237 Tue, 24 Jan 2012 19:14:52 +0000 работа с Excel в XE2 https://forum.sources.ru/index.php?showtopic=347684&view=findpost&p=3066237 Цитата vepdl @ 24.01.12, 06:40

Подскажите, где взять документацию для ExcelApplication (желательно с примерами).

Google
у Borland-a, а теперь Embarcadero нет описания этих компонентов

Могу дать свой класс работы с Excel, сделанный на основе TApplicationExcel.
Правда там методов там кот наплакал, самое основное что мне надо было. Дописывать буду мере необходимости.]]> Дима Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=347684&view=findpost&p=3065759 Tue, 24 Jan 2012 06:40:07 +0000 работа с Excel в XE2 https://forum.sources.ru/index.php?showtopic=347684&view=findpost&p=3065759 vepdl Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=347684&view=findpost&p=3063339 Fri, 20 Jan 2012 07:16:50 +0000 работа с Excel в XE2 https://forum.sources.ru/index.php?showtopic=347684&view=findpost&p=3063339 Цитата vepdl @ 18.01.12, 10:17

Подскажите где найти TApplicationExcel. Галку включил.

После включения галки появляется раздел Office2K. Там и есть TApplicationExcel.]]> Дима Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=347684&view=findpost&p=3061819 Wed, 18 Jan 2012 10:17:27 +0000 работа с Excel в XE2 https://forum.sources.ru/index.php?showtopic=347684&view=findpost&p=3061819
У меня на var_Excel.OleProcedure("Quit"); выбрасывает с Break (First chance exception at $75ABD36F. Exception class $40000015 with message 'system exception (code 0x40000015) at 0x75abd36f'. Process SM.exe (4416)
)]]> vepdl Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=347684&view=findpost&p=3053746 Thu, 29 Dec 2011 09:47:13 +0000 работа с Excel в XE2 https://forum.sources.ru/index.php?showtopic=347684&view=findpost&p=3053746 Спасибо.]]> artsb Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=347684&view=findpost&p=3053686 Thu, 29 Dec 2011 08:31:31 +0000 работа с Excel в XE2 https://forum.sources.ru/index.php?showtopic=347684&view=findpost&p=3053686 Цитата artsb @ 29.12.11, 08:22

У меня XE и в нём нет TApplicationExcel... Хотя помнится, что в более старых версиях он был. Похоже возродили... Или вы установили пакет отдельно?

Его не убрали и не возрождали - просто по умолчанию отключили.
В Project->Options->Packages включил птичку "C++ Builder Office 2000 Servers Package"

Но даже после апдейта хелпа эта птичка опять была выключена. Embarcadero как-бы намекает - пользоваться им не надо :D]]> Дима Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=347684&view=findpost&p=3053670 Thu, 29 Dec 2011 08:22:25 +0000 работа с Excel в XE2 https://forum.sources.ru/index.php?showtopic=347684&view=findpost&p=3053670 artsb Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=347684&view=findpost&p=3053656 Thu, 29 Dec 2011 08:12:47 +0000 работа с Excel в XE2 https://forum.sources.ru/index.php?showtopic=347684&view=findpost&p=3053656 TApplicationExcel. Оказалась ОЧЕНЬ удобная штука.
Выпадающие списки методов весьма кстати - учитывая то что нет обширной документации по работе с Ole.]]> Дима Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=347684&view=findpost&p=3053647 Thu, 29 Dec 2011 08:08:48 +0000 работа с Excel в XE2 https://forum.sources.ru/index.php?showtopic=347684&view=findpost&p=3053647

var_Cell = var_Sheet.OlePropertyGet(L"Range",L"A1");

// или

var_Cell = var_Sheet.OlePropertyGet(L"Range",WideString(L"A1"));

Ещё можно через "Cells"

var_Cells = var_Sheet.OlePropertyGet(L"Cells");

var_Cell = var_Cells.OlePropertyGet(L"Item", _Col_, _Row_);

]]> artsb Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=347684&view=findpost&p=3048737 Tue, 20 Dec 2011 13:50:39 +0000 работа с Excel в XE2 https://forum.sources.ru/index.php?showtopic=347684&view=findpost&p=3048737
Но тут всплыли траблы с работой в Excel. Был создан небольшой класс работающий через OLE с Excel...
Отказывается работать!

Вот кусок кода для примера:

Variant var_Excel,var_Book,var_Sheet,var_Cell;

var_Excel=Variant::CreateObject("Excel.Application");

var_Excel.OlePropertySet("Visible",true);

var_Book=var_Excel.OlePropertyGet("Workbooks").OlePropertyGet("Add");

var_Sheet = var_Book.OlePropertyGet("Worksheets",1);

var_Sheet.OleProcedure("Activate");

var_Cell = var_Sheet.OlePropertyGet("Range","A1");//НА ЭТОЙ СТРОЧКЕ ОШИБКА

var_Cell.OlePropertySet("Value","Hello world");

var_Book.OleProcedure("Save");

var_Excel.OleProcedure("Quit");

при попытке выполнить

var_Sheet.OlePropertyGet("Range","A1");

вылетает ошибка "EOleSysError Неверный тип переменной"...

в настройках проекта стоит "_TCHAR maps to : char" пробую так:

var_Sheet.OlePropertyGet("Range",(wchar_t)"A1");

вообще вылетает OLE error 800A03EC...]]> Дима Borland C++ Builder/Turbo C++ Explorer