Sejam bem vindos ao nosso forum, onde havera hacks, utilitários tutoriais e dicas para diversos jogos, fique conosco e desfrute do melhor.

Participe do fórum, é rápido e fácil

Sejam bem vindos ao nosso forum, onde havera hacks, utilitários tutoriais e dicas para diversos jogos, fique conosco e desfrute do melhor.
Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

ShellExecute Códigos

Ir para baixo

ShellExecute Códigos Empty ShellExecute Códigos

Mensagem por Mr.Positive Qua Jan 12, 2011 4:19 pm

ShellExecute serve pra Abrir arquivos, Navegador e etc. Abaixo exemplos de códigos mais usados:

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 'Invision'


ShellExecute(Handle,'open',
'c:\ThunderHome',
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.invisoncheats.com.br',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@procode.net?subject=' +
em_subject + '&body=' + em_body;

ShellExecute(Handle,'open',
PChar(em_mail), nil, nil, SW_SHOWNORMAL);
end;

Creditos: Pelo Topico : Mr.Positive
Creditos pelo Codicos: -Ztouzan-<s></s><s></s>
Mr.Positive
Mr.Positive
Membro
Membro

Mensagens : 40
Agradecimentos : 0
Data de inscrição : 12/01/2011
Idade : 29
Localização : Recreio
Humor : Feliz !
ShellExecute Códigos Left_bar_bleue0 / 1000 / 100ShellExecute Códigos Right_bar_bleue



Ir para o topo Ir para baixo

Ir para o topo

- Tópicos semelhantes

 
Permissões neste sub-fórum
Não podes responder a tópicos