Amigos, é possível abrir um documento do WORD somente LEITURA com a TWORD? Ou seja de forma que o usuário não possa alterar o documento.
Fiquem com Deus
Aokisantos
FWH25+XHARBOUR 99.50
FiveTech Support Forums
FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Abrir documento WORD somente LEITURA com TWORD é POSSIVEL?
Una manera muy fácil, es marcar el fichero como "solo lectura".
Un saludo
Manuel
Manuel
Mais como marcar o arquivo como leitura com FW?
A classe TWORD não faz isso?
Fique com Deus
Aokisantos 
FWH25+XHARBOUR 99.50
AOKISANTOS wrote:Mais como marcar o arquivo como leitura com FW?(
No se hace desde FW sino desde Windows.
MiPC + c: + directorio en el fichero pincha botón derecho y en propiedades del arquivo marcar como "solo lectura".
Un saludo
Manuel
Manuel
AOKISANTOS wrote:Amigos, é possível abrir um documento do WORD somente LEITURA com a TWORD? Ou seja de forma que o usuário não possa alterar o documento.
Fiquem com Deus
Aokisantos
Aokisantos :
Necesitas cambiar el método OpenDoc()
Por default lReadOnly en FALSE , si es TRUE el documento se abrirá como sólo lectura
METHOD OpenDoc( cNombreDoc , lReadOnly ) CLASS TWord <---- // Vikthor
local sal := .t.
DEFAULT lReadOnly := .F. <------- // Vikthor
::oDocs := ::oWord:Get( "Documents" )
if file( cNombreDoc )
::oActiveDoc := ::oDocs:Invoke( "Open",cNombreDoc , , lReadOnly ) <------- // Vikthor
if valtype(::oActiveDoc) <> 'O'
sal := .f.
endif
else
sal := .f.
endif
::oTexto := ::oWord:Get( "Selection" )
::oOptions := ::oWord:Get("Options") // Vikthor
::oMailMerge := ::oActiveDoc:Get( "MailMerge") // Vikthor
::oTables := ::oActiveDoc:Get( "Tables") // Vikthor
::cNombreDoc := cNombreDoc
::nLinea := 0
::nCol := 0
::nPage := 0
::nYoffset := 0
::nXoffset := 0
::oSelection := ::oActiveDoc
::lstartpag := .t.
::lsetcm := .f.
::lOverflowing := .f.
::nlastrow := 0
::ctextoverflow := ''
RETURN salVikthor