Fórum Detectar se um programa está sendo executado?? #286106

blz galera,

Eu peguei o código abaixo para detectar quando certo programa está em execução:

[color=blue:3b59b0cfb5]{ Coloque um Button no Form e altere o evento OnClick deste como abaixo: }
procedure TForm1.Button1Click(Sender: TObject);
begin
{ Verifica o Delphi }
if FindWindow(´TAppBuilder´, nil) > 0 then
ShowMessage(´O Delphi está aberto´)
else
ShowMessage(´O Delphi NÃO está aberto´);

{ Verifica o Word }
if FindWindow(´OpusApp´, nil) > 0 then
ShowMessage(´O Word está aberto´)
else
ShowMessage(´O Word NÃO está aberto´);

{ Verifica o Excell }
if FindWindow(´XLMAIN´, nil) > 0 then
ShowMessage(´O Excell está aberto´)
else
ShowMessage(´O Excell NÃO está aberto´);
end;[/color:3b59b0cfb5]

Mas o problema é que eu preciso disso para o Internet Explorer, alguêm sabe que nome que eu tenho que colocar dentro dos parenteses ?

Exemplo

if FindoWindow(´Internet Explorer´,nil) > 0 then ........


Alguêm sabe ?

Muito Obrigado...Aguardo resposta...