أخي ألن تشرح الكود أم أمثلة فقط :confused:
[ تمت الإجابة ]أريد كود لهذه المهام ونأمل مساعدتكم
مغلق
السلام عليكم
هناك comment في الكود الخاص بـ kb_hook.dll .أغلب دوال الـ API المستخدمه مشروحه في win32 api Help ( يمكن مراجعه MSDN Help ) .
سأقوم بشرح كامل للمثال حين تتوافر الفرصه لذلك .
أخي
kernel
لايخفى على الجميع أهمية الhook
لكن كلما أبحث عن مواضيع تتعلق بال hook
يطلع لي مواقع روسية أو صينية
يوجد بعضها انكليزي
http://www.gajits.com/delphihooks.asp#What...0I%20learned%20
كيف لنا أن نفهم ماهو الhook إن لم يكن هناك مرجع له
إن كان الdelphi7 help والذي يعتبره البعض عظيما لايحتوي سوى بضع كلمات
hook
A callback function provided by an application that receives certain data before the normal recipient of the data. The hook function can thus examine or modify the data before passing it on.
إن كنت تريد أن تتعلم الhook
تجعلك تنفر منه
ماهذا
هل نحن بحاجة إلى أن نقضي عمرنا في البحث عن الHook حتى نتعلمه
أم يجب علينا أن نتعلم الصيني أو الروسي حتى نتعلم الhook
هل هناك صفحات شبيهة بهذه الصفحات الروسية
إن شاء الله تكون مجانية
هل أحدكم قام بتحميلها
السلام عليكم
للاسف في هذه الفتره بالذات ليس لدي وقت كافي لاكتب اي مواضيع طويله .
هذه بعض المواضيع التي تتحدث عن hook :
http://msdn.microsoft.com/library/default....sdn_hooks32.asp
http://www.funducode.com/freevc/misc_vc/mi...1/misc_vc11.htm
هناك غيرها ايضا .
هناك بعض الكتب التي تحتوي في بعض فصولها شرحا عن آليهhook , منها كتب Jeffrey Richter ( منها Windows 95: A Developer's Guide )
أظن ان هناك كتب اخرى تحوي شرح عن أليه hook ( حاول تبحث عنها ان كان لديك وقت )
مثلا هذا كتاب اخر : Win32 API Programming with Visual Basic
http://www.oreilly.com/catalog/win32api/toc.html
حاول تجمع اكثر قدر من المعلومات والامثله حول الموضوع لتتضح لديك الرؤيه عن الموضوع .
عذرا لاني لم اقدم اي شئ - لكن هذا الفصل الدراسي ساكون مشغول بدرجه كبيره -.
شكرا لجهودك أخي لكن أنا لاأجيد سوى الدلفي والباسكال
كنت أريد مواضيع تتعلق بالدلفي
على كل الاحوال شكرا لك وأيضا جدا مشغول إن شاء الله في أقرب فرصة نتعاون أكثر(f)
أخ رضا
هناك العديد من الموضوعات التي لها علاقه بـ system programing تتطلب منك ان تجيد لغه C ( نظام ويندوز مبني بها ). فالكثير من المبرمجين في هذا المجال يفضل استخدام C , بامكانك القول ان اغلب win32 guru من مبرمجي c ( منهم , Jeffrey Richter , Gary Nebbett ,Matt Pietrek... وغيرهم ).أضف الى ذلك ان ما تقدمه MS من امثله او كتب تتطلب معرفه بالسي.
والله ياأخي بعد أن سفت دروس الاستاذ هاني الاتاسي في قسم الc
أفكر جديا في تعلمها
بانسبة لان نظام الوندوز
الكل يظن أنه بالc
لكنه بلغة شبيهة جدا بها ويعملون كمبايلر لها على الc
ويهمون الناس بذلك
أخبرني بهذه المعلومات شخص عمل بالwin95
لكن مجرد تصور
حتى أن الشفرات التي يكشفون عنها هي معدلة بالاساس
وأنتم أخبر سيدي
اي اخ كيرنل مافي مانع من شوية امثلة .. بتكون حركة ظريفة منك والله
وخاصة انو الموضوع لسا ما اغلق .. ولسا ما انشفا غليلنا ن
ALT CTRL DEL
بتاع اكس بي :D
طيب يا اخوان بخصوص ردي السابق كنت لسا ما شايف كل الصفحات وفاكر صفحة وحدة بس ما مشكل
وبخصوص تعطيل ال ALT CTRL DEL
هذا هوى الكود
وانا جالس الان على اكس بي .. ومجربه ميت مرة بقا ما حد يقلي مش شغال
procedure DisableTaskMgr(bTF: Boolean);
var
reg: TRegistry;
begin
reg := TRegistry.Create;
reg.RootKey := HKEY_CURRENT_USER;
reg.OpenKey('Software', True);
reg.OpenKey('Microsoft', True);
reg.OpenKey('Windows', True);
reg.OpenKey('CurrentVersion', True);
reg.OpenKey('Policies', True);
reg.OpenKey('System', True);
if bTF = True then
begin
reg.WriteString('DisableTaskMgr', '1');
end
else if bTF = False then
begin
reg.DeleteValue('DisableTaskMgr');
end;
reg.CloseKey;
end;
// Example Call:
procedure TForm1.Button1Click(Sender: TObject);
begin
DisableTaskMgr(True);
end;الكود واضح .. بعتقد وإن شاء الله تستفيدو منه ..
بالمناسبة مجرد ما يكبس الضحية على الت كونترول ديليت بيطلعله رسالة خطأ محتواها انو الادمين عطلهولك :P:p:p
up
up
up
الموضوع قديم
لكن عاجبني lol
بالصفحه الثانيه ملف مرفق مـن kernel80 مو قادر احمله
:)
بصراحة الموضوع اخد اكتر من حجمه
زوروا هالموقع و حملوا مكتبة DLL و المثال و شوفوا
اللهم صل و سلم على سيدنا محمد
كاف و نون خلقهم و فنائهم كاف و نون
عالمي شاشة و لغتي صفر و واحد
Just Smile ............You can do it
When you stop learning ... You stop leading
لساني بنطقي صامت عنه عادل............وقلبي بصمتي ضاحك منه هازل
وأتـعـب من نـاداك من لا تـجيبـه............وأغـيظ من عـاداك من لا تـشاكـل
مدونتي الشخصية : Tammam Koujan
آخر مواضيع المدونة :
اقتباسبصراحة الموضوع اخد اكتر من حجمهزوروا هالموقع و حملوا مكتبة DLL و المثال و شوفوا
ليش زعلان ؟
لو الموضوع اخذ اكثر من حجمه كنت وضعت رد وافي لا أن تعطي مكتبه DLL جاهزة تحتاج تسجيل . حتى أنك لم تشرح شئ عنها .
صاحبنا اللي كتب المكتبة السابقة اعتمد على GINA , أعتقد الكثيرين في الفريق العربي سمعوا بها من قبل . (طبعاً الاعتماد على هذه الطريقة يستلزم عمل اعادة تشغيل للنظام ).
"First they ignore you, then they laugh at you, then they attack you, then you win"
===
اقتباسحُكَّامُـنَا إِنْ تَصَـدّوا لِلْحِمَــى اقْتَحَمُـوا ***** وَإِنْ تَصَدَّى لَـهُ المُسْتَعْمِـرُ انْسَحَبُـوا
هُمْ يَفْرشـُونَ لِجَيْـشِ الغَــزْوِ أَعْيُنَـهُـمْ ***** وَيَدَّعُــونَ وُثُـوبَـاً قَـبْـلَ أَنْ يَثِـبُــوا
الحَاكِمُـونَ و«وَاشُنْـطُـنْ» حُكُومَتُـهُـمْ ***** وَاللامِعُــونَ وَمَـا شَعَّـوا وَلا غَرَبُــوا
القَاتِلُـــونَ نُبُــوغَ الشَّـعْــبِ تَرْضِـيَـــةً ***** لِلْمُعْتَدِيــنَ وَمَـا أَجْـدَتْـهُـمُ الـقُــرَبُ
لَهُمْ شُمُـوخُ «المُثَنَّـى» ظَاهِـرَاً وَلَهُـمْ ***** هَـوَىً إِلَـى بَابَـك الخَرْمِـيّ يُنْتَسَـبُ
البردوني "أبو تمام وعروبة اليوم" 1971
===
اقتباسعبيد الهوى يحكمون البـلاد ***** ويحكمهــم كلّهـــم درهــــــمو تقتـادهـم شهـوة لا تنــام ***** وهـــم فـي جـهالتهــم نــــوّم
ففــي كـــلّ ناحيــة ظـالـــم ***** غبــــــيّ يسـلـّطــــه أظلـــم
أيا من شبعتم على جوعــنا ***** وجـــوع بنينـا ألـم تتخمـــوا ؟
ألم تفهموا غضبة الكادحين ***** على الظلـم ؟ لا بدّ أن تفهموا
البردوني "نحن و الحاكمون "
اولا انا مش زعلان :lol:
بس هالموضوع فعلا اخد اكتر من حجمه
تانيا يا حبيبي المثال المرفق مع المكتبة كافي و وافي
ثالثا انا عطيت مكتبة جاهزة لأنو استخدامها سهل بدك شيفرات ما عندي مانع
اقتباسصاحبنا اللي كتب المكتبة السابقة اعتمد على GINA
لاحظ انو جزء خاص معتمد عليها
و هي اداة دلفي و ما في داعي لاعادة القلاع B)
اللهم صل و سلم على سيدنا محمد
كاف و نون خلقهم و فنائهم كاف و نون
عالمي شاشة و لغتي صفر و واحد
Just Smile ............You can do it
When you stop learning ... You stop leading
لساني بنطقي صامت عنه عادل............وقلبي بصمتي ضاحك منه هازل
وأتـعـب من نـاداك من لا تـجيبـه............وأغـيظ من عـاداك من لا تـشاكـل
مدونتي الشخصية : Tammam Koujan
آخر مواضيع المدونة :
اخي Delta Aziz كلامك صحيح بس انا ما شفت هالموضوع غير من يومين
و حبيت ساعد
اللهم صل و سلم على سيدنا محمد
كاف و نون خلقهم و فنائهم كاف و نون
عالمي شاشة و لغتي صفر و واحد
Just Smile ............You can do it
When you stop learning ... You stop leading
لساني بنطقي صامت عنه عادل............وقلبي بصمتي ضاحك منه هازل
وأتـعـب من نـاداك من لا تـجيبـه............وأغـيظ من عـاداك من لا تـشاكـل
مدونتي الشخصية : Tammam Koujan
آخر مواضيع المدونة :
اقتباسيا حبيبي المثال المرفق مع المكتبة كافي و وافيانا عطيت مكتبة جاهزة لأنو استخدامها سهل بدك شيفرات ما عندي مانع
نعم بدي شفرات, ما بحب استخدم مكتبات جاهزة خصوصاً في هذا الجزء من البرمجة
اقتباسلاحظ انو جزء خاص معتمد عليها
عذراً , لم أفهم القصد . ممكن توضح أكثر ...
اقتباسو هي اداة دلفي و ما في داعي لاعادة القلاع
"أداة دلفي" أي أداة تقصد؟
اتقصد انه لا داعي لاعادة الاقلاع في أنظمة عائلة الـ NT ؟ إن كان كذلك فيبدو أنك لم تتطلع على الموضوع تماماً..
"First they ignore you, then they laugh at you, then they attack you, then you win"
===
اقتباسحُكَّامُـنَا إِنْ تَصَـدّوا لِلْحِمَــى اقْتَحَمُـوا ***** وَإِنْ تَصَدَّى لَـهُ المُسْتَعْمِـرُ انْسَحَبُـوا
هُمْ يَفْرشـُونَ لِجَيْـشِ الغَــزْوِ أَعْيُنَـهُـمْ ***** وَيَدَّعُــونَ وُثُـوبَـاً قَـبْـلَ أَنْ يَثِـبُــوا
الحَاكِمُـونَ و«وَاشُنْـطُـنْ» حُكُومَتُـهُـمْ ***** وَاللامِعُــونَ وَمَـا شَعَّـوا وَلا غَرَبُــوا
القَاتِلُـــونَ نُبُــوغَ الشَّـعْــبِ تَرْضِـيَـــةً ***** لِلْمُعْتَدِيــنَ وَمَـا أَجْـدَتْـهُـمُ الـقُــرَبُ
لَهُمْ شُمُـوخُ «المُثَنَّـى» ظَاهِـرَاً وَلَهُـمْ ***** هَـوَىً إِلَـى بَابَـك الخَرْمِـيّ يُنْتَسَـبُ
البردوني "أبو تمام وعروبة اليوم" 1971
===
اقتباسعبيد الهوى يحكمون البـلاد ***** ويحكمهــم كلّهـــم درهــــــمو تقتـادهـم شهـوة لا تنــام ***** وهـــم فـي جـهالتهــم نــــوّم
ففــي كـــلّ ناحيــة ظـالـــم ***** غبــــــيّ يسـلـّطــــه أظلـــم
أيا من شبعتم على جوعــنا ***** وجـــوع بنينـا ألـم تتخمـــوا ؟
ألم تفهموا غضبة الكادحين ***** على الظلـم ؟ لا بدّ أن تفهموا
البردوني "نحن و الحاكمون "
الظاهر انك معصب هدي حالك و لا يهمك شي
بدك اعادة تشغيل عميل اعادة تشغيل بس بنصحك تجرب المثال قبل
بدك شيفرة زور الموقع delphi.about.com
و عميل بحث عن الموضوع the big brother delphi toolkit
اللهم صل و سلم على سيدنا محمد
كاف و نون خلقهم و فنائهم كاف و نون
عالمي شاشة و لغتي صفر و واحد
Just Smile ............You can do it
When you stop learning ... You stop leading
لساني بنطقي صامت عنه عادل............وقلبي بصمتي ضاحك منه هازل
وأتـعـب من نـاداك من لا تـجيبـه............وأغـيظ من عـاداك من لا تـشاكـل
مدونتي الشخصية : Tammam Koujan
آخر مواضيع المدونة :
انا ما معصب ولا شئ
بس عندما تدخل في نقاش ما لا بد أن تكون لديك أشياء تزكي كلامك .
اقتباسبدك اعادة تشغيل عميل اعادة تشغيل بس بنصحك تجرب المثال قبل
المثال يمكنك من تعطيل عدة مفاتيح وفي موضوعنا ذكر انه يمكن ذلك باستخدام Keyboard hook
بالنسبة لتعطيل CTRL+ALT+DEL فاستخدام keyboard hook ينفع مع win2k لكن مع winxp تحتاج لعمل أشياء اضافية
الطريقة الأخرى هي استعمال GINA (لمعلومات اكثر راجع MDSN ).
طبعا المثال السابق استعمل الطريقة الأخيرة وبدون اعادة تشغيل سيمكنك تعطيل جميع المفاتيح عدا CTRL+ALT+DEL قبل عمل restart (هذا الكلام في xp انا مجربه)
راجع ملف dwlreference.chm المرفق مع المثال وستجد هذا الكلام
أهم نقاط النقاش في الموضوع هي disable CTRL+ALT+DEL in WINXP . بقية الأشياء اعتقد الكثيرين يعلمون عنها ...
اقتباسبدك شيفرة زور الموقع delphi.about.comو عميل بحث عن الموضوع the big brother delphi toolkit
هل شيفرة مكتبة الـ DLL مرفقة ؟ (المشكله هنا)
شكراً
تم تعديل هذه المشاركة بواسطة cipher في 13 نوفمبر 2005 في 20:27
"First they ignore you, then they laugh at you, then they attack you, then you win"
===
اقتباسحُكَّامُـنَا إِنْ تَصَـدّوا لِلْحِمَــى اقْتَحَمُـوا ***** وَإِنْ تَصَدَّى لَـهُ المُسْتَعْمِـرُ انْسَحَبُـوا
هُمْ يَفْرشـُونَ لِجَيْـشِ الغَــزْوِ أَعْيُنَـهُـمْ ***** وَيَدَّعُــونَ وُثُـوبَـاً قَـبْـلَ أَنْ يَثِـبُــوا
الحَاكِمُـونَ و«وَاشُنْـطُـنْ» حُكُومَتُـهُـمْ ***** وَاللامِعُــونَ وَمَـا شَعَّـوا وَلا غَرَبُــوا
القَاتِلُـــونَ نُبُــوغَ الشَّـعْــبِ تَرْضِـيَـــةً ***** لِلْمُعْتَدِيــنَ وَمَـا أَجْـدَتْـهُـمُ الـقُــرَبُ
لَهُمْ شُمُـوخُ «المُثَنَّـى» ظَاهِـرَاً وَلَهُـمْ ***** هَـوَىً إِلَـى بَابَـك الخَرْمِـيّ يُنْتَسَـبُ
البردوني "أبو تمام وعروبة اليوم" 1971
===
اقتباسعبيد الهوى يحكمون البـلاد ***** ويحكمهــم كلّهـــم درهــــــمو تقتـادهـم شهـوة لا تنــام ***** وهـــم فـي جـهالتهــم نــــوّم
ففــي كـــلّ ناحيــة ظـالـــم ***** غبــــــيّ يسـلـّطــــه أظلـــم
أيا من شبعتم على جوعــنا ***** وجـــوع بنينـا ألـم تتخمـــوا ؟
ألم تفهموا غضبة الكادحين ***** على الظلـم ؟ لا بدّ أن تفهموا
البردوني "نحن و الحاكمون "
للمهتمين بـ GINA يمكن الحصول على معلومات اكثر هنا
http://delphi-jedi.org/APILIBRARY:265460
في :
Interface for the Microsoft WinLogon eXtension (WLX) API
ftp://delphi-jedi.org/api/WinWlx.zip
عمل رائع فعلاً
"First they ignore you, then they laugh at you, then they attack you, then you win"
===
اقتباسحُكَّامُـنَا إِنْ تَصَـدّوا لِلْحِمَــى اقْتَحَمُـوا ***** وَإِنْ تَصَدَّى لَـهُ المُسْتَعْمِـرُ انْسَحَبُـوا
هُمْ يَفْرشـُونَ لِجَيْـشِ الغَــزْوِ أَعْيُنَـهُـمْ ***** وَيَدَّعُــونَ وُثُـوبَـاً قَـبْـلَ أَنْ يَثِـبُــوا
الحَاكِمُـونَ و«وَاشُنْـطُـنْ» حُكُومَتُـهُـمْ ***** وَاللامِعُــونَ وَمَـا شَعَّـوا وَلا غَرَبُــوا
القَاتِلُـــونَ نُبُــوغَ الشَّـعْــبِ تَرْضِـيَـــةً ***** لِلْمُعْتَدِيــنَ وَمَـا أَجْـدَتْـهُـمُ الـقُــرَبُ
لَهُمْ شُمُـوخُ «المُثَنَّـى» ظَاهِـرَاً وَلَهُـمْ ***** هَـوَىً إِلَـى بَابَـك الخَرْمِـيّ يُنْتَسَـبُ
البردوني "أبو تمام وعروبة اليوم" 1971
===
اقتباسعبيد الهوى يحكمون البـلاد ***** ويحكمهــم كلّهـــم درهــــــمو تقتـادهـم شهـوة لا تنــام ***** وهـــم فـي جـهالتهــم نــــوّم
ففــي كـــلّ ناحيــة ظـالـــم ***** غبــــــيّ يسـلـّطــــه أظلـــم
أيا من شبعتم على جوعــنا ***** وجـــوع بنينـا ألـم تتخمـــوا ؟
ألم تفهموا غضبة الكادحين ***** على الظلـم ؟ لا بدّ أن تفهموا
البردوني "نحن و الحاكمون "
يعطيك ألف عافيه cipher :)
فعلا كنت ابحث عن مثل هذا بعد مااطلعت على مشاريع بالـ++c تخص msgina.dll
ألف شكرررررررررر :rolleyes:
هذا الموضوع مغلق.