Exibir mensagem anterior :: Exibir próxima mensagem |
Autor |
Mensagem |
diego_crc Aprendiz
Registrado: Quinta-Feira, 20 de Mai de 2004 Mensagens: 100 Localização: Recife - PE
|
Enviada: Sex Jun 04, 2004 5:27 pm Assunto: Como abrir um arquivo txt no notepad, com chamada a partir do Delphi??? |
|
|
Oi Pessoal,
Alguém sabe como realizar a abertura de um arquivo txt no notepad via Delphi???
Eu sei que o comando: \"WinExec(\'C:\\WINDOWS\\system32\\notepad.exe\', SW_SHOW);\", Possibilita a abertura do notepad. Mas tem como abri um arquivo que eu quero???
Desde já, OBRIGADO!!!
_________________ --------------------------------------------------------------
** Sem esfoço não há recompensas **
Diego Canuto
e-mail: diego_crc@pop.com.br
-------------------------------------------------------------- |
|
Voltar ao Topo |
|
|
alcino Novato
Registrado: Quinta-Feira, 3 de Abril de 2003 Mensagens: 2
|
Enviada: Sex Jun 04, 2004 5:50 pm Assunto: Como abrir um arquivo txt no notepad, com chamada a partir do Delphi??? |
|
|
faça o seguinte use:
ExecutePrograma (\'C:\\Arquivos de programas\\Microsoft Office\\Office\\winWord.exe\', \'janeiro.doc\');
use o mesmo exemplo para abrir o notepad e o arquivo requerido.
Inclua a procedure em sua unit
[b] procedure tform1.ExecutePrograma(Nome, Parametros: String);
Var
Comando: Array[0..1024] of Char;
Parms: Array[0..1024] of Char;
begin
StrPCopy (Comando, Nome);
StrPCopy (Parms, Parametros);
ShellExecute (0, Nil, Comando, Parms, Nil, SW_Shownormal);
end;[/b] |
|
Voltar ao Topo |
|
|
diego_crc Aprendiz
Registrado: Quinta-Feira, 20 de Mai de 2004 Mensagens: 100 Localização: Recife - PE
|
Enviada: Sex Jun 04, 2004 6:02 pm Assunto: Como abrir um arquivo txt no notepad, com chamada a partir do Delphi??? |
|
|
Alcino,
Tem algum Unit que eu devo usar? O Delphi da um erro: \"Undeclared Identifier: \'ShellExecute\' \".
Por quê será???
_________________ --------------------------------------------------------------
** Sem esfoço não há recompensas **
Diego Canuto
e-mail: diego_crc@pop.com.br
-------------------------------------------------------------- |
|
Voltar ao Topo |
|
|
Sanpag Novato
Registrado: Sábado, 24 de Abril de 2004 Mensagens: 19
|
Enviada: Sex Jun 04, 2004 7:48 pm Assunto: Como abrir um arquivo txt no notepad, com chamada a partir do Delphi??? |
|
|
Faça assim:
ShellExecute(Application.Handle, nil, Pchar(nomeArquivo), nil, nil, SW_SHOWNORMAL);
O nomeArquivo deve ter o endereco completo exemplo: c:\\arquivos\\teste.txt
Este comando abre qualquer arquivo utilizando a Api do Windows ou seja se for .doc abre o word, .xls abre o excell
Ele utiliza o programa cadatrado no windows para abrir (tipos de arquivos) no explorer.
Ps: Deve ser declarada no Uses o ShellApi, e o nome do arquivo é um variavel do tipo String;
um abraço
Sandro
|
|
Voltar ao Topo |
|
|
sh@dow Mestre
Registrado: Domingo, 21 de Março de 2004 Mensagens: 807
|
Enviada: Sex Jun 04, 2004 8:57 pm Assunto: Como abrir um arquivo txt no notepad, com chamada a partir do Delphi??? |
|
|
Ou
WinExec(\'C:\\WINDOWS\\system32\\notepad.exe [b] c:\\teste.txt[/b]\', SW_SHOW);
_________________ <a>Regras do fórum</a> |
|
Voltar ao Topo |
|
|
diego_crc Aprendiz
Registrado: Quinta-Feira, 20 de Mai de 2004 Mensagens: 100 Localização: Recife - PE
|
Enviada: Sáb Jun 05, 2004 1:43 pm Assunto: Como abrir um arquivo txt no notepad, com chamada a partir do Delphi??? |
|
|
Obrigado a todos, me ajudaram bastante, valeu!!! _________________ --------------------------------------------------------------
** Sem esfoço não há recompensas **
Diego Canuto
e-mail: diego_crc@pop.com.br
-------------------------------------------------------------- |
|
Voltar ao Topo |
|
|
|