![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как в 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,'');