Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как в Excel после работы с файлом закрыть без сохранения [Delphi, Windows]


Ragazor ©   (2004-09-10 12:44:00) 

Делаю так...
Excel.ActiveSheet.Shapes.Item('Picture 5').Select;
Excel.Selection.ShapeRange.LockAspectRatio:=false;
Excel.Selection.ShapeRange.Height:=120;
Excel.Selection.ShapeRange.Width:=120;
Excel.Selection.Copy;
Form1.Image1.Picture.Assign(Clipboard);
Это вносит правку в файл, потом по окончани работы выпадает запрос, "Сохранить изменения в файле? №Да№  №Нет№ №ОТмена№"

Как сделать так чтобы все закрылось БЕЗ изменений?

(Может есть что-то типа CloseWSave или Undo)


r_nikola   (2004-09-10 13:52:00) [1]

Помогло?


Ragazor   (2004-09-10 13:36:00) [2]

это я делаю,
просто не пишу такое сюда


r_nikola   (2004-09-10 13:29:00) [3]

в догонку:

ExcelApp := CreateOleObject('Excel.Application');
ExcelBook := ExcelApp.ActiveWorkbook;


r_nikola   (2004-09-10 13:26:00) [4]

ExcelBook.Close(False,'');


Наверх

Титульная страница Поиск, карта сайта Написать письмо