Abrindo arquivos via ShellExecute

[Samuel N. Junior]

Bom dia a todos (as),

Sempre que minha aplicação precisa abrir arquivos XLS, PDF ou outro tipo de documento eu uso o ShellExecute que chamo da seguinte maneira:

ShellExecute(0, 'open', PCHAR(wArquivo), nil, nil, SW_SHOWNORMAL);

Onde o wArquivo indica o nome/caminho do arquivo que deverá ser aberto, exemplo (C:\Arquivos\Planilha.XLS).

Isso sempre funcionou perfeitamente porém, de um tempo para cá, às vezes a aplicação "congela" na hora do ShellExecute.

Quando isso ocorre, sou obrigado a chamar o Gerenciador de Tarefas do Windows e matar o processo da minha aplicação.

Eu diria que quando estou "debugando" a aplicação ela trava 1 vez a cada 50 execuções.

Quando estou rodando a aplicação (de fora do Delphi), ela trava 1 vez a cada 150 execuções.

Uso o Delphi XE e parece que isso começou a ocorrer no Windows 8.1

Alguém passou por algo parecido ou tem alguma rotina diferente para abrir arquivos sem usar o Shellexecute?

[ ]s

Samuel

[Gustavo Segalla]

Olá, bom dia

Eu utilizo da seguinte forma, e a principio não tenho report de problemas:

ShellExecute(Handle, nil, Pchar(path+'export.xls'), nil, nil, SW_SHOW);

Abç.

--
--
Você recebeu esta mensagem porque está inscrito no "DUG-RS -
Delphi Users Group Rio Grande do Sul" em Grupos do Google.
Acesse o nosso BLOG em http://www.dug-rs.org e contribua com a comunidade Delphi do Rio Grande do Sul
Para postar neste grupo, envie um e-mail para dug...@googlegroups.com
Para cancelar a sua inscrição neste grupo, envie um e-mail para
dug-rs-un...@googlegroups.com
Para ver mais opções, visite este grupo em
http://groups.google.com.br/group/dug-rs?hl=pt-BR
 
Twitter: @dugrs
http://www.facebook.com/groups/dugrs/
http://www.Vimeo.com/dugrs

---
You received this message because you are subscribed to the Google Groups "DUG-RS - Delphi Users Group Rio Grande do Sul" group.
To unsubscribe from this group and stop receiving emails from it, send an email to dug-rs+un...@googlegroups.com.
For more options, visit https://groups.google.com/d/optout.