Кто может помочь, ситуация следующая: Из шестых Дельфов в ексель делаю отчёт — всё нормально работает, но возникла необходимость сделать предварительный просмотр печатаемого документа, сначала пробовал сделать просмотр посредством OleContainer, но отчёты у меня огромаднейшие — А3 , а у контейнера ограниченные возможности — все варианты SizeMode- не устраивают. Вопрос: можно ли организовать просмотр через сам Excel, но так чтоб у пользователя, не было возможности менять содержимое екселевского файла, т.е программно из дельфов (напр. после вызова:
ExcelApp := CreateOleObject('Excel.Application');
ExcelApp.Visible := true
выставить такие настройки екселя, чтоб в данном варианте был только просмотр с возможностью менять масштаб просмотра, или может быть возможен другой вариант предварительного просмотра печатаемого документа кроме OleContainer?
Заранее благодарен.
Дмитрий.
Здравствуйте Rider, Вы писали:
R> ExcelApp := CreateOleObject('Excel.Application');
R> ExcelApp.Visible := true;)
в шаблоне нужные ячейки отметь защищаемыми,
// как ставится защита на книгу от изменения структуры
//и лист от изменения содержимого
..
IWorkbook: Excel97.ExcelWorkbook;
ISheet: Excel97.ExcelWorksheet;
...
IWorkbook := ExcelApplication1.Workbooks.Add(FHomeDir+'Form2.xlt',0);
IWorkbook.Protect('aaa',TRue,False);
..
ISheet := IWorkbook.Worksheets.Item['Лист1'] as Excel97.ExcelWorksheet;
ISheet.Protect('aaa',True,True,True,False,GetUserDefaultLCID);
