Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 13.10.2010, 10:03   #1
S_Yevgeniy
Форумчанин
 
Аватар для S_Yevgeniy
 
Регистрация: 08.07.2009
Сообщений: 246
По умолчанию Как правильно отключиться от Excel а из под Delphi.

Доброе время суток уважаемые дамы и господа.
Подскажите пожалуйста. Есть программа по преобразованию файлов из ТХТ в файл Excel.
Использовал Delphi 2009 и Microsoft Office 2003.
Вот части кода

Код:
   Excel := CreateOleObject('Excel.Application');

   WorkBook  :=  Excel.WorkBooks.ADD;
   WorkSheet := Workbook.ActiveSheet;

.... тут передача данных в Excel


Код:
Workbook.SaveAs(FileName:= FileName5);

Workbook.Close;

Excel:=unassigned;
Excel.quit;

Проблема в том что как программа отработала в диспетчере задач Excel остается.
Ну и соответственно память под приложение выделена.
Подскажите в чем ошибка.

Заранее спасибо.
Да прибудет с Вами свет и радость!!!

Последний раз редактировалось S_Yevgeniy; 13.10.2010 в 10:06.
S_Yevgeniy вне форума Ответить с цитированием
Старый 13.10.2010, 10:32   #2
Z1000000
Форумчанин
 
Регистрация: 04.05.2010
Сообщений: 495
По умолчанию

Код:
Excel:=unassigned;
Excel.quit;
Ты сначала освобождаешь интерфейс, а потом делаешь quit неизвестно чего. Переставь их местами. Думаю в этом ошибка.

Код:
Excel.quit;
Excel:=unassigned;
Нажми на весы, поставь +
Для благодарностей : WebMoney WMR R252732729948
Z1000000 вне форума Ответить с цитированием
Старый 13.10.2010, 11:35   #3
S_Yevgeniy
Форумчанин
 
Аватар для S_Yevgeniy
 
Регистрация: 08.07.2009
Сообщений: 246
По умолчанию

Спасибо. Но это не решает проблемы а в добавок получаю ошибку.
Да прибудет с Вами свет и радость!!!
S_Yevgeniy вне форума Ответить с цитированием
Старый 13.10.2010, 11:43   #4
Z1000000
Форумчанин
 
Регистрация: 04.05.2010
Сообщений: 495
По умолчанию

Что за ошибка ?
Под Delphi 6 и Excel 2003 SP2 нижеприведенная конструкция работает идеально.
Дело может быть в особенностях Delphi 2009 или в твоем рабочем коде.

Код:
Excel := CreateOleObject('Excel.Application');
ShowMessage('Объект создан');
Excel.quit;
Excel:=unassigned;
Нажми на весы, поставь +
Для благодарностей : WebMoney WMR R252732729948
Z1000000 вне форума Ответить с цитированием
Старый 13.10.2010, 11:56   #5
Grag
А может и не...
Участник клуба
 
Аватар для Grag
 
Регистрация: 27.03.2010
Сообщений: 1,269
По умолчанию

Лично я делаю так
Код:
  try
    //если Эксель запущен, то получаю доступ к процессу...
    ExcelApp:=GetActiveOleObject('Excel.Application');
  except
    //если Эксель не запущен, то создаю процесс...
    ExcelApp:=CreateOleObject('Excel.Application')
  end;
а потом
Код:
  ExcelApp.Workbooks.Close; //закрываю книги экселя
  ExcelApp.Quit;  //закрываю эксель
  ExcelApp:=UnAssigned
Перемешивай дело с бездельем и не сойдешь с ума...
Grag вне форума Ответить с цитированием
Старый 13.10.2010, 12:00   #6
S_Yevgeniy
Форумчанин
 
Аватар для S_Yevgeniy
 
Регистрация: 08.07.2009
Сообщений: 246
По умолчанию

Цитата:
Сообщение от Z1000000 Посмотреть сообщение
Что за ошибка ?
Дело может быть в особенностях Delphi 2009 или в твоем рабочем коде.
Еще раз спасибо.
Хочешь проблем поставь делфи 2009 и начни разработку приложения на нем. А может это ручки кривые что тоже очень возможно.
Спасибо.

Цитата:
Сообщение от Grag Посмотреть сообщение
Лично я делаю так
Спасибо большое, сейчас попробую.
Да прибудет с Вами свет и радость!!!

Последний раз редактировалось S_Yevgeniy; 13.10.2010 в 12:08. Причина: Прошу прошения за два сообщения подряд.
S_Yevgeniy вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Вывод разных стилей под разное разрешение. Как правильно оформить? Steh PHP 1 20.07.2010 12:01
окно ввода в приложении под windows: как правильно считывать числа?? avroraoff Assembler - Ассемблер (FASM, MASM, WASM, NASM, GoASM, Gas, RosAsm, HLA) и не рекомендуем TASM 4 19.12.2009 19:29
Работа с Excel из под Delphi. S_Yevgeniy Общие вопросы Delphi 1 09.12.2009 16:37
Работа с Excel из под Delphi. S_Yevgeniy Помощь студентам 0 08.12.2009 08:13
как правильно составить формулу в Excel? Вики Помощь студентам 2 01.02.2008 12:20