TWebBrowser и *.doc [D5, Win2k]
Opryshok © (2005-05-16 20:55:00)
Привет!
Использую TWebBrowser для просмотра файлов (документов jpg,
bmp, pdf, doc, rtf) а програме. WebBrowser открывает в своем окне
все эти документы. Мне нужно чтоб они были Read-Only.
Но doc и rtf редактируются когда откррываются word-ом в
WebBrowser.
Пробовал запросить в WebBrowser.Documentа интерфейс
_Document, но у него пропертя ReadOnly только для чтения :-)
Подскажите кто сталкивался как реализовать просмотр доков в
бровзере.
Спасибо
Opryshok (2005-05-17 11:53:00) [1]
Сам спросил, сам ответил
var
lDoc: _Document;
v1, v2: OleVariant;
begin
WebBrowser1.Document.QueryInterface(IID__Document,
lDoc);
v2 := EmptyParam;
v1 := EmptyParam;
if lDoc <> nil then
begin
lDoc.Protect(wdAllowOnlyComments or
wdAllowOnlyRevisions, v1, v2);
lDoc.Saved := True;
end;
end;
Наверх 
ЧАТ |
Орешник |
|
