Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.03.04;
Скачать: [xml.tar.bz2];




Вниз

Вопрос по Excel. 


vic_vm   (2002-02-16 16:46) [0]

Вопрос по Excel.
Делаю следующее

FIXLSApp : Excel97.TExcelApplication ;
IWorkbook: Excel97._Workbook;
ISheet: Excel97._Worksheet;
--------------------------------------
//Подключение к Excel
if not Assigned(FIXLSApp) then begin
FIXLSApp := Excel97.TExcelApplication.Create(Self);
end;

FIXLSApp.ConnectKind := ckRunningInstance;
FIXLSApp.Connect;
Conn := true;
IWorkbook:= FIXLSApp.Workbooks.Item[1];
ISheet := IWorkbook.Worksheets.Item[1] as Excel97._Worksheet;

//Далее считываю данные и затем

if Conn then
begin
FIXLSApp.Disconnect;
FreeAndNil(FIXLSApp);
Conn := false;
end;

Если затем я сначала закрываю программу, а потом Excel то все проходит
нормально,
а если пытаюсь первым закрыть Excel то во время закрытия выдает что Excel
выполнил
недопустимую операцию. Как-то наверно я некоректно отключаюсь или что то я
не освобождаю
вот только непонимаю что



drpass   (2002-02-16 19:45) [1]

Попробуй использовать CoInitialize перед работой с Excel и CoUninitialize после




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.03.04;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.021 c
1-9218            avk                   2002-02-15 11:33  2002.03.04  
ListBox переход на следующую строку...


7-9312            UN9GW                 2001-11-29 21:46  2002.03.04  
как получить данные извне с регистра 0x378 LPT порта?


3-9076            Demon ltd             2002-02-06 23:58  2002.03.04  
Показ в данных выборочно из таблицы


1-9130            Squall                2002-02-17 03:05  2002.03.04  
Объясните пожалуйста !!! (Transparency)!!!


1-9233            staratel              2002-02-13 15:29  2002.03.04  
web