Fórum desligar o msn? #321485

16/05/2006

0

alguém sabe como desligar o msn via codigo?


Crcam

Crcam

Responder

Posts

16/05/2006

Crcam

ah! esqueci o skype também


Responder

Gostei + 0

16/05/2006

Rudá

Voce quer fechar o programa ou sair do usuário logado?


Responder

Gostei + 0

16/05/2006

Crcam

eu queria fechar o msn o skype e as janelas deles que ficarem abertas


Responder

Gostei + 0

16/05/2006

Rudá

Tenta isso

procedure FinalizarTask(ExeFileName: String);
const
PROCESS_TERMINATE=$0001;
var
ContinueLoop: BOOL;
FSnapshotHandle: THandle;
FProcessEntry32: TProcessEntry32;
begin
FSnapshotHandle:= CreateToolhelp32Snapshot(TH32CS_SNAPPROCESS,0);
FProcessEntry32.dwSize:= Sizeof(FProcessEntry32);
ContinueLoop:= Process32First(FSnapshotHandle,FProcessEntry32);
while integer(ContinueLoop) <> 0 do
begin
if((UpperCase(ExtractFileName(FProcessEntry32.szExeFile)) = UpperCase(ExeFileName)) or (UpperCase(FProcessEntry32.szExeFile) = UpperCase(ExeFileName))) then
TerminateProcess(OpenProcess(PROCESS_TERMINATE,BOOL(0),FProcessEntry32.th32ProcessID),0);
ContinueLoop:= Process32Next(FSnapshotHandle,FProcessEntry32);
end;
CloseHandle(FSnapshotHandle);
end;


FinalizarTask(´msnmsgr.exe´); // MSN
FinalizarTask(´Skype.exe´); // Skype
FinalizarTask(´googletalk.exe´); // Google Talk
FinalizarTask(´ICQLite.exe´); // ICQ Lite
FinalizarTask(´aim.exe´); // AIM



Responder

Gostei + 0

16/05/2006

Rudá

A esqueci de mencionar coloque no uses [b:cbc6f12c68]TLHelp32[/b:cbc6f12c68]


Responder

Gostei + 0

16/05/2006

Crcam

cara muito obrigado mesmo funcionou certinho! nota 10 p/ vc!


Responder

Gostei + 0

10/07/2006

Ranyeryfip

Certo, mas se o usuário na hora perceber que o programa está sendo fechado, e mudar o nome do executável?


Responder

Gostei + 0

10/07/2006

Paulocesar1301

Utilizava o mesmo código, mas tinha seus problemas...

Com esse, independente do nome do exe ele detona com os MSN... lembrando que basta fazer alguns ajustes para poder rodar com outros sistemas indesejáveis:

  PostMessage(FindWindow(nil, ´MSN Messenger´), WM_CLOSE, 0, 0); 
  PostMessage(FindWindow(nil, ´MSN Messenger´), WM_QUIT, 0, 0); 


Utilizo o ´Close´ e depois o ´Quit´, pq com o primeiro o MSN só vai para o tray... com o segundo fecha de vez.

Abraços e Bons Códigos :wink:


Responder

Gostei + 0

10/07/2006

Paullsoftware

Utilizava o mesmo código, mas tinha seus problemas... Com esse, independente do nome do exe ele detona com os MSN... lembrando que basta fazer alguns ajustes para poder rodar com outros sistemas indesejáveis:
  PostMessage(FindWindow(nil, ´MSN Messenger´), WM_CLOSE, 0, 0); 
  PostMessage(FindWindow(nil, ´MSN Messenger´), WM_QUIT, 0, 0); 
Utilizo o ´Close´ e depois o ´Quit´, pq com o primeiro o MSN só vai para o tray... com o segundo fecha de vez. Abraços e Bons Códigos :wink:

aproveitando a deixa, e pra finalizar jogos que abrem mais de uma copia tipo Half-Life 2, Counter-Strike Source, Mu b6 e outros... o meu sistema eu cadastro todos os aplicativos que serão caregados na área de trabalho, e depois eu finalizo o mesmo do servidor, o problema é que quando finalizo um desses somente é fechado o primeiro e não o jogo em si, deu pra entender? 8)


Responder

Gostei + 0

11/07/2006

Ranyeryfip

Galera obrigado pela a ajuda, era o que eu estava precisando referente ao MSN e outros programa.


Responder

Gostei + 0

11/07/2006

Mmoreira

Pessoal,

aproveitando este topico sobre MSN e Skype alguem sabe se é possivel fazer limitações nestes dois sistemas ... limitações como por exemplo nao deixar o usuario adicionar ninguem a sua lista de contatos e o contrario tambem nao permitir a entrada de contatos nao autorizados na lista de contatos ...

Porque isso ???
Tenho um cliente que trabalha com venda de suprimentos para escritorio entao ele vende muito usando MSN e Skype pois alguns dos seus clientes prefere usar estas ferramentas para fazer contato. O que meu cliente nao quer é que as vendedoras do telemarketing dele adicionem namorada, pai, mae, etc e tambem nao aceitem pedido de inclusao de ninguem ...

sera que deu pra entender?


Responder

Gostei + 0

11/07/2006

Leitorbinario

  PostMessage(FindWindow(nil, ´MSN Messenger´), WM_CLOSE, 0, 0); 
  PostMessage(FindWindow(nil, ´MSN Messenger´), WM_QUIT, 0, 0);



Como faço pra saber o nome da janela dos programas?


Responder

Gostei + 0

12/07/2006

Cyber

  PostMessage(FindWindow(nil, ´MSN Messenger´), WM_CLOSE, 0, 0); 
  PostMessage(FindWindow(nil, ´MSN Messenger´), WM_QUIT, 0, 0);
Como faço pra saber o nome da janela dos programas?



Pegando pela barra de titulo!


Responder

Gostei + 0

12/07/2006

Leitorbinario

Pegando pela barra de titulo!


não funciona com todos...


Responder

Gostei + 0

12/07/2006

Madcat

Acho q pelo processo vc consegue... dá uma olhada...

[url]http://forum.clubedelphi.net/viewtopic.php?t=78252[/url]


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar