frnd Postado Maio 7, 2008 Denunciar Share Postado Maio 7, 2008 tenho um botao no delphi e queria que ele abrisse um file qualquer da maquina...então fiz assim...uses ShellApi; ........................... ......... procedure TForm1.BitBtn1Click(Sender: TObject); begin ShellExecute(Handle, 'open', 'c:\logs.txt',nil,nil, SW_SHOWNORMAL); end;mas quando rodo e clico no botão o programa fecha!oque tem de errado? ou seria melhor com execfile?[]s Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 frnd Postado Maio 7, 2008 Autor Denunciar Share Postado Maio 7, 2008 Agora funcionou....com o botão normal, e com o bitbtn não... Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 Micheus Postado Maio 7, 2008 Denunciar Share Postado Maio 7, 2008 Agora funcionou....com o botão normal, e com o bitbtn não...frnd, isto não faz sentido.Por acaso este botão anterior não teria a sua propriedade ModalResult modificada (diferente de mrNone) ? Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 frnd Postado Maio 7, 2008 Autor Denunciar Share Postado Maio 7, 2008 (editado) Sim, tinha modificado! Editado Maio 7, 2008 por frnd Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 Jhonas Postado Maio 7, 2008 Denunciar Share Postado Maio 7, 2008 Outros exemplos com o ShellExecute (Dica de martins_vicente )Executar o Bloco de Notas uses ShellApi; ... ShellExecute(Handle, 'open', 'c:\Windows\notepad.exe', nil, nil, SW_SHOWNORMAL); Abrir o arquivo leiame.txt com o Bloco de Notas ShellExecute(Handle,'open', 'c:\windows\notepad.exe','c:\leiame.txt', nil, SW_SHOWNORMAL); Exibir o conteúdo da pasta 'forumweb' ShellExecute(Handle,'open', 'c:\forumweb', nil, nil, SW_SHOWNORMAL); Abrir um arquivo com o aplicativo associado a sua extensão ShellExecute(Handle, 'open', 'c:\Meus Documentos\teste_delphi.doc',nil,nil,SW_SHOWNORMAL); Abrir um determinado site com o browser padrão ShellExecute(Handle, 'open', 'http://www.forumweb.com.br/foruns',nil,nil, SW_SHOWNORMAL); Enviar email com assunto e corpo semi-preenchidos var em_subject, em_body, em_mail : string; begin em_subject := 'Assunto'; em_body := 'Corpo da mensagem'; em_mail := 'mailto:teste@forumweb.com.br?subject=' + em_subject + '&body=' + em_body; ShellExecute(Handle,'open', PChar(em_mail), nil, nil, SW_SHOWNORMAL); end;abraço Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 Micheus Postado Maio 7, 2008 Denunciar Share Postado Maio 7, 2008 Sim, tinha modificado!Então. Por exemplo, quando você usa opção como mrOk e mrCancel e chama o form que o possui com ShowModal, ao clicar neste botão a janela será fechada. Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 michel pael Postado Maio 9, 2008 Denunciar Share Postado Maio 9, 2008 CLICK DE UM BUTTONShellExecute(Handle, nil, 'C:\temp2.htm', nil, nil, SW_SHOW); Citar Link para o comentário Compartilhar em outros sites More sharing options...
Pergunta
frnd
tenho um botao no delphi e queria que ele abrisse um file qualquer da maquina...
então fiz assim...
mas quando rodo e clico no botão o programa fecha!
oque tem de errado? ou seria melhor com execfile?
[]s
Link para o comentário
Compartilhar em outros sites
6 respostass a esta questão
Posts Recomendados
Participe da discussão
Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.