الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

أخفاء التطبيق من قائمة المهام

بدأه rober في 16 يونيو 2008 · 4 رد · 985 مشاهدة · في لغة Delphi
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم

أخواني أنا أبحث عن طريقة لأخفاء تطبيقي من(مدير المهام = task manager )

بحثت كثيرا لكنني لم أجد شيأ له علاقة في المنتدى و أماكن أخرى

وجدت أزالة التطبيق من قائمة المهام لكن ليس ذلك المطلوب

ويوجد كود خاص بالمهمة لكنه لا يعمل سو على winme,win98 لأحتياجه لتابع في Kernal32

و لم أجد حل مع xp

فهل من طريقة مقترحة منكم و أرجو أن أجد الحل

مشكورين مسبقا على ما سوف تقومون به

و السلام ختام

I'm Away For Sometimes

I'll Finish My Works

Come Back Soon

More Study > More Search > More Try > More Learning > Great Success

#2

هناك موضوعين هنا بقسم دلفي بطريقتين مختلفتين

استخدم زر البحث او تصفح المواضيع السابقة حتى تجدها

والسلام عليكم ورحمة الله

d4baa0.gif
#3

بسم الله الرحمن الرحيم

أخي الكريم قبل أن أضيف الموضوع قمت بالبحث في المنتدى و Google

و جددت عدة طرق لكنها لا تعمل سو على win9x أحداها التي ذكرها الأخ Ikossan هنا

و لم أجد سوى طريقة واحدة تعمل مع xp وهي Injection وهي طريقة معقدة و أحترافية فهل من الممكن وجود

دالة خاصة بالـ xp

I'm Away For Sometimes

I'll Finish My Works

Come Back Soon

More Study > More Search > More Try > More Learning > Great Success

#4

السلام عليكم...

ثلاث خطوات بسيطة لإخفاء التطبيق من شريط المهام (TaskBar) و Task Manager و تعطيل Alt+Tab لمنع التبديل إلى برامج أخرى:

1. في الوحدة الرئيسية للمشروع أضف السطر المبين في الكود التالي:

  Application.Initialize;
  Application.Title := '';	// << أضف هذا السطر >>
  Application.CreateForm(TForm1, Form1);
  Application.Run;

السطر المضاف يعمل على إخفاء التطبيق من قائمة التطبيقات في نافذة الـ Task Manager. الخدعة هي أن الـ Task Manager لا يعرض البرامج التي ليس لها عنوان.

2، 3. في معالج الحدث OnCreate للنافذة الرئيسية اكتب الكود التالي:

procedure TForm1.FormCreate(Sender: TObject);
begin
	' تعطيل Alt+Tab:
	RegisterHotKey(0, 0, MOD_ALT, VK_TAB);
	' إخفاء زر التطبيق من شريط المهام TaskBar:
   ShowWindow(Application.Handle, SW_HIDE);
   SetWindowLong(Application.Handle, GWL_EXSTYLE,
	   getWindowLong(Application.Handle, GWL_EXSTYLE) or
	   WS_EX_TOOLWINDOW);
   ShowWindow(Application.Handle, SW_SHOW);
end;

أخيراً، و للاستفادة يمكنك منع الوصول إلى نافذة الـ Task Manager (أي تعطيل Ctrl+Alt+Delete) بضبط القيمة DisableTaskMgr على 1 في سجل النظام (Registry) تحت المفتاح:

HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System

و هي من النوع العددي الصحيح (DWORD). حيث يمكنك مثلاً في بداية تشغيل التطبيق استعمال أوامر الـ Registry لضبطها على 1 (إذا لم تكن موجودة يمكنك إنشاؤها). و لا تنس أن تعيد ضبطها على 0 أو حذفها عند إغلاق برنامجك ليعمل النظام بشكل طبيعي.

نرجو الاستفادة و السلام.

وَ قُلِ اعْمَلُوا فَسَيَرَى اللهُ عَمَلَكُمْ وَ رَسُولُهُ وَ الْمُؤْمِنُونَ

صدق الله العظيم

#5
اقتباس
و لم أجد سوى طريقة واحدة تعمل مع xp وهي Injection وهي طريقة معقدة و أحترافية

لا يوجد شئ إسمه معقد أو إحترافي فهذه هي إحدى الطرق المعروفة حالياً

اقتباس
فهل من الممكن وجود

دالة خاصة بالـ xp

لا أظن وجود ذلك .. ويفضل ألا تضع أسئلة من نوع قسم الفيجوال بيسك هنا ..

"First they ignore you, then they laugh at you, then they attack you, then you win"

===

اقتباس

حُكَّامُـنَا إِنْ تَصَـدّوا لِلْحِمَــى اقْتَحَمُـوا ***** وَإِنْ تَصَدَّى لَـهُ المُسْتَعْمِـرُ انْسَحَبُـوا

هُمْ يَفْرشـُونَ لِجَيْـشِ الغَــزْوِ أَعْيُنَـهُـمْ ***** وَيَدَّعُــونَ وُثُـوبَـاً قَـبْـلَ أَنْ يَثِـبُــوا

الحَاكِمُـونَ و«وَاشُنْـطُـنْ» حُكُومَتُـهُـمْ ***** وَاللامِعُــونَ وَمَـا شَعَّـوا وَلا غَرَبُــوا

القَاتِلُـــونَ نُبُــوغَ الشَّـعْــبِ تَرْضِـيَـــةً ***** لِلْمُعْتَدِيــنَ وَمَـا أَجْـدَتْـهُـمُ الـقُــرَبُ

لَهُمْ شُمُـوخُ «المُثَنَّـى» ظَاهِـرَاً وَلَهُـمْ ***** هَـوَىً إِلَـى بَابَـك الخَرْمِـيّ يُنْتَسَـبُ

البردوني "أبو تمام وعروبة اليوم" 1971

===

اقتباس
عبيد الهوى يحكمون البـلاد ***** ويحكمهــم كلّهـــم درهــــــم

و تقتـادهـم شهـوة لا تنــام ***** وهـــم فـي جـهالتهــم نــــوّم

ففــي كـــلّ ناحيــة ظـالـــم ***** غبــــــيّ يسـلـّطــــه أظلـــم

أيا من شبعتم على جوعــنا ***** وجـــوع بنينـا ألـم تتخمـــوا ؟

ألم تفهموا غضبة الكادحين ***** على الظلـم ؟ لا بدّ أن تفهموا

البردوني "نحن و الحاكمون "

مواضيع مشابهة