Konuyu Paylaş : facebook gplus twitter

Konuyu Oyla:
  • Derecelendirme: 3/5 - 1 oy
  • 1
  • 2
  • 3
  • 4
  • 5
Görev yöneticisinden program sonlandırma
#1
Arkadaşlar merhabalar, bir buton aracılığı ile görev yöneticisinden belirttiğim uygulamayı kapatmak istiyorum bu konuda yardımlarınızı rica ediyorum.
Cevapla
#2
"belirttiğim uygulamayı" -> Uygulamayı nasıl belirteceksiniz? Yani EXE ismine göre mi, PID'ye göre mi yoksa pencerenin handle'ına göre mi uygulama sonlandırılacak?
There's no place like 127.0.0.1
WWW
Cevapla
#3
Merhabalar hocam, internette böyle bir kaynağa rastladım işinizi görecektir.

function KillTask(ExeFileName: string): integer;
const 
PROCESS_TERMINATE=$0001; 
var 
ContinueLoop: BOOL;
FSnapshotHandle: THandle; 
FProcessEntry32: TProcessEntry32;
begin 
result := 0; 

FSnapshotHandle := CreateToolhelp32Snapshot 
(TH32CS_SNAPPROCESS, 0); 
FProcessEntry32.dwSize := Sizeof(FProcessEntry32); 
ContinueLoop := Process32First(FSnapshotHandle, 
FProcessEntry32); 

while integer(ContinueLoop) <> 0 do 
begin 
if ((UpperCase(ExtractFileName(FProcessEntry32.szExeF ile)) = 
UpperCase(ExeFileName)) 
or (UpperCase(FProcessEntry32.szExeFile) = 
UpperCase(ExeFileName))) then 
Result := Integer(TerminateProcess(OpenProcess( 
PROCESS_TERMINATE, BOOL(0), 
FProcessEntry32.th32ProcessID), 0)); 
ContinueLoop := Process32Next(FSnapshotHandle, 
FProcessEntry32); 
end; 

CloseHandle(FSnapshotHandle); 
end;
Kullanımı
killtask('calısan.exe');

 Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol


Saygılarımla,
Iyi çalışmalar.
May the force be with you!
Cevapla
#4
Aslında; "kill process" şeklinde aratırsanız bir çok hazır örnek bulabilirsiniz.
There's no place like 127.0.0.1
WWW
Cevapla
#5
(10-10-2017, Saat: 09:13)SimaWB Adlı Kullanıcıdan Alıntı: Linkleri Görebilmeniz İçin Giriş yap veya Üye OlAslında; "kill process" şeklinde aratırsanız bir çok hazır örnek bulabilirsiniz.

Zamanlamamiz mükemmel hocam  Big Grin
May the force be with you!
Cevapla
#6
(10-10-2017, Saat: 09:12)SimaWB Adlı Kullanıcıdan Alıntı: Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol"belirttiğim uygulamayı" -> Uygulamayı nasıl belirteceksiniz? Yani EXE ismine göre mi, PID'ye göre mi yoksa pencerenin handle'ına göre mi uygulama sonlandırılacak?

exe ismine göre sonlandırmayı düşünüyordum hocam.

(10-10-2017, Saat: 09:13)hyperxman Adlı Kullanıcıdan Alıntı: Linkleri Görebilmeniz İçin Giriş yap veya Üye OlMerhabalar hocam, internette böyle bir kaynağa rastladım işinizi görecektir.

function KillTask(ExeFileName: string): integer;
const 
PROCESS_TERMINATE=$0001; 
var 
ContinueLoop: BOOL;
FSnapshotHandle: THandle; 
FProcessEntry32: TProcessEntry32;
begin 
result := 0; 

FSnapshotHandle := CreateToolhelp32Snapshot 
(TH32CS_SNAPPROCESS, 0); 
FProcessEntry32.dwSize := Sizeof(FProcessEntry32); 
ContinueLoop := Process32First(FSnapshotHandle, 
FProcessEntry32); 

while integer(ContinueLoop) <> 0 do 
begin 
if ((UpperCase(ExtractFileName(FProcessEntry32.szExeF ile)) = 
UpperCase(ExeFileName)) 
or (UpperCase(FProcessEntry32.szExeFile) = 
UpperCase(ExeFileName))) then 
Result := Integer(TerminateProcess(OpenProcess( 
PROCESS_TERMINATE, BOOL(0), 
FProcessEntry32.th32ProcessID), 0)); 
ContinueLoop := Process32Next(FSnapshotHandle, 
FProcessEntry32); 
end; 

CloseHandle(FSnapshotHandle); 
end;
Kullanımı
killtask('calısan.exe');

 Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol


Saygılarımla,
Iyi çalışmalar.

Bir kilo altından daha değerli bir bilgi resmen Smile  Çok teşekkürler..
Cevapla
#7
Exe sonlandırmak için Bu yeterli boşuna kod karmaşasına girmenize gerek yok,
TASKKILL /F /IM iexplore.exe
Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol
Kuvvete dayanamayan adalet aciz, 
Adalete dayanamayan kuvvet zalimdir.
WWW
Cevapla
#8
(10-10-2017, Saat: 13:35)yhackup Adlı Kullanıcıdan Alıntı: Linkleri Görebilmeniz İçin Giriş yap veya Üye OlExe sonlandırmak için Bu yeterli boşuna kod karmaşasına girmenize gerek yok,
TASKKILL /F /IM iexplore.exe

Delphi ile bu kodu nasıl çalıştırabiliriz peki? Bende önce bat dosyası oluşturup winexec komutu ile bat dosyasını çalıştırıyordum ancak ekranda çıkan konsol pencereleri biraz can sıkıcı bu yüzden direk sonlandırmak istedim.
Cevapla
#9
(10-10-2017, Saat: 14:26)tgural Adlı Kullanıcıdan Alıntı: Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol
(10-10-2017, Saat: 13:35)yhackup Adlı Kullanıcıdan Alıntı: Linkleri Görebilmeniz İçin Giriş yap veya Üye OlExe sonlandırmak için Bu yeterli boşuna kod karmaşasına girmenize gerek yok,
TASKKILL /F /IM iexplore.exe

Delphi ile bu kodu nasıl çalıştırabiliriz peki? Bende önce bat dosyası oluşturup winexec komutu ile bat dosyasını çalıştırıyordum ancak ekranda çıkan konsol pencereleri biraz can sıkıcı bu yüzden direk sonlandırmak istedim.

Sw_hide komutu ile gizleyebilirsiniz  Smile
May the force be with you!
Cevapla
#10
(10-10-2017, Saat: 14:26)tgural Adlı Kullanıcıdan Alıntı: Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol
(10-10-2017, Saat: 13:35)yhackup Adlı Kullanıcıdan Alıntı: Linkleri Görebilmeniz İçin Giriş yap veya Üye OlExe sonlandırmak için Bu yeterli boşuna kod karmaşasına girmenize gerek yok,
TASKKILL /F /IM iexplore.exe

Delphi ile bu kodu nasıl çalıştırabiliriz peki? Bende önce bat dosyası oluşturup winexec komutu ile bat dosyasını çalıştırıyordum ancak ekranda çıkan konsol pencereleri biraz can sıkıcı bu yüzden direk sonlandırmak istedim.

   uses ShellApi;

ShellExecute(0, 'open', 'cmd.exe', '/k TASKKILL /F /IM iexplore.exe', nil, SW_HIDE) ;
şeklinde kullanabilirsiniz.
Bizi Toprağa Gömdüler Fakat Tohum Olduğumuzu Bilmiyorlardı.
Cevapla

Konuyu Paylaş : facebook gplus twitter



Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
  Çok dilli program desteği öneri 3ddark 10 379 21-06-2018, Saat: 10:04
Son Yorum: 3ddark
  Program içinde resim üzerine yazi gonulali 1 116 06-06-2018, Saat: 11:29
Son Yorum: iyarar
  Uzak masaüstünde çalışan program, bağlantı kesildiğinde hata veriyor canbir 0 178 16-03-2018, Saat: 18:50
Son Yorum: canbir
  Program Files Yetki Sorunu narkotik 9 376 18-01-2018, Saat: 17:45
Son Yorum: SimaWB
Question program içerisine veritabansız kayıt BY-HAYALET 6 315 09-12-2017, Saat: 12:23
Son Yorum: Abdullah ILGAZ



Konuyu Okuyanlar: 1 Ziyaretçi