Как избежать самопроизвольного закрытия Excel?
Аноним
TVariantInParam Cell1,strvalue;
RangePtr cells;
_WorksheetPtr ws;
ExcelWorkbook1->ConnectTo(ExcelApplication1->ActiveWorkbook);
ws=ExcelWorkbook1->Get_ActiveSheet();
Cell1="B5";
cells=ws->get_Range(Cell1,TNoParam());
cells->Activate();
strvalue="hhhh";
cells->set_Value(strvalue);
ExcelApplication1->Disconnect();
Проблема в том, что, когда приложение завершается, Excel пытается самостоятельно закрыться. Как этого избежать?
Под каким Builder пишешь?
Если под BCB 5.0 то сервера для какого office и не возникало ли при компиляции ошибки "cannot cast from 'const TBaseVariantT<tagVARIANT>' to 'TVariant&'
Если под BCB 5.0 то сервера для какого office и не возникало ли при компиляции ошибки "cannot cast from 'const TBaseVariantT<tagVARIANT>' to 'TVariant&'
Поставь ExcelApplication1->AutoQuit=false;
и убери Disconnect. (Это если Excel у тебя видимый).
и убери Disconnect. (Это если Excel у тебя видимый).