Abrir arquivos do Excel e PDF com Tcl Tk
Pergunta
Estou tendo problemas ao abrir um arquivo do Excel existente com Tcl Tk. Eu sou capaz de abrir um arquivo do MS Word existente sem problemas. O código que estou usando é o seguinte, também o meu aplicativo de teste tem "pacote exigem TCOM" incluíram:
proc OpenFile {} {
#Path to file
set app [::tcom::ref getobject "C:\\Users\\Me\\Desktop\\Test.doc"]
#Change path to application
set this [$app Application]
#Open application
$this Visible 1
}
Este código é executado por um botão. Basicamente, Test.doc fica aberto depois que o botão é pressionado.
Eu tentei mudar o arquivo para um arquivo do Excel existente, e quando eu pressionar o botão o arquivo é aberto para uma fração de segundo, e depois fecha. Isso também acontece com os arquivos do MS Access, também.
Alguém sabe como abrir um arquivo do Excel existente com Tcl Tk, e fazê-lo ficar aberta? Além disso, para PDFs e arquivos de texto, eu entendo que eu não posso usar TCOM para abrir esses arquivos. Alguém sabe como PDFs abertos, texto e outros arquivos não-MS com Tcl Tk?
Eu realmente aprecio sua ajuda!
Obrigado,
DFM
Solução
Assumindo que você está no Windows e você só quer abrir um arquivo (.xls, .pdf, ...) com a sua aplicação usual (ie. Não modificar o arquivo a partir de seu script), você pode simplesmente usar o "start" assim:
set TestDoc "My Test.xls"
eval exec [auto_execok start \"\" [list $TestDoc]