Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2008.01.27;
Скачать: [xml.tar.bz2];

Вниз

ExcelWorkbook.WriteReserved   Найти похожие ветки 

 
Ega23 ©   (2007-12-28 11:50) [0]

Ситуация.
Ставлю пароль на Excel-документ (пароль на запись). Т.е., судя по описанию, терминальный флаг WriteReserved должен быть True
Открываю документ:

 try
   wb := XL.Workbooks.Open(OpenDlg.FileName, EmptyParam, True, EmptyParam,
                           "**************", EmptyParam, EmptyParam, EmptyParam,
                           EmptyParam, EmptyParam, EmptyParam, EmptyParam,
                           EmptyParam, 0);

   if wb.WriteReserved[0] then
   //if wb.ReadOnly[0] then
     Memo1.Lines.Add("WriteReserved")
   else
     Memo1.Lines.Add("Not WriteReserved");
 finally
   wb := nil;
 end;


Предполагается, что я его открываю только на чтение (выделено True).
Если посмотреть, то wb.ReadOnly[0] - действительно выполняется (т.е. сам workbook действительно открыт только для чтения).
Но. wb.WriteReserved[0] почему-то false.

В чём может быть проблема?


 
Ega23 ©   (2007-12-28 11:54) [1]

Причём.
wb := XL.Workbooks.Open(OpenDlg.FileName, EmptyParam, True, EmptyParam,
                          "**************", "writepassword", EmptyParam, EmptyParam,
                          EmptyParam, EmptyParam, EmptyParam, EmptyParam,
                          EmptyParam, 0);


если в качестве writepassord поставить реальный пароль, то тогда терминальный флаг WriteReserved действительно становится True



Страницы: 1 вся ветка

Форум: "Начинающим";
Текущий архив: 2008.01.27;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.006 c
15-1198068851
андр
2007-12-19 15:54
2008.01.27
ToolButtom


1-1192971907
Dimmitt
2007-10-21 17:05
2008.01.27
Синхронная прокрутка двух Memo


15-1198002697
Kerk
2007-12-18 21:31
2008.01.27
Виски


2-1198847106
paul
2007-12-28 16:05
2008.01.27
FindKey


2-1197658894
Unicode
2007-12-14 22:01
2008.01.27
Как вводить символы Unicode в окно редактора кода и в приложения?





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский