Buscar

Fechar outro programa

Código

Fechar outro programa
1. Exemplo de como fechar a calculadora a partir do texto da janela
 
Procedure TForm1.Button1Click(Sender: TObject);
begin
PostMessage(FindWindow(nil, 'Calculadora'), WM_CLOSE,0,0);
end;
 
2. Exemplo de como fechar a calculadora a partir da classe
 
Procedure TForm1.Button1Click(Sender: TObject);
begin
PostMessage(FindWindow('scicalc', nil), WM_CLOSE,0,0);
end;
Obs.: A classe de um programa pode ser descoberta usando o programa Winsight32 que vem com o delphi.

 By Lloyd Dickinson

 
 

Publicidade

Vote na dica




Quantidade de votos: 0 votos
Aceitação: 0%

Detalhes da dica

Categoria: Arquivos
Adicionada dia: 04/05/05
Por: Dapper Rodrigo
Visualizada: 4773 vezes

Planeta Delphi - Tudo sobre programação Delphi Planeta Delphi - www.planetadelphi.com.br - Todos os direitos reservados | Copyright 2001-2009