كيف يتم تغيير الزر إبدا في النظام ؟

[nabilkeb]

كيف يتم تغيير الزر إبداء ؟

[STRELiTZIA]

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

اعادة تسمية زر النظام Start

var Handle1, Handle2: hwnd;
begin
Handle1 := FindWindow('Shell_TrayWnd', nil);
Handle2 := FindWindowEx(Handle1, 0, 'Button', nil);
SetWindowText(Handle2, PAnsiChar(Edit1.Text));
SendMessage(Handle2, Messages.WM_MOUSEMOVE, 0, 0);


تعطيله و تفعيله


EnableWindow(FindWindowEx(FindWindow
('Shell_TrayWnd', nil), 0, 'Button', nil), FALSE);


التغيير يكون فقط في : TRUE او FALSE

بالتوفيق ان شاء الله

[nabilkeb]

كيف يتم تغيير الزر إبدأ ؟

هذا هو مكان السؤال و الجواب ، تشكر جدا يا بطل.
تحياتي .:d

[galag8]

السلام عليكم
اعتقد ان هذا الكود لايعمل في وندوز فيستا لقد قمت بتجريبه ولم يحدث اي تغير

EnableWindow(FindWindowEx(FindWindow
;:('Shell_TrayWnd', nil), 0, 'Button', nil), FALSE)

[nabilkeb]

مع xp يعمل عادي .
و لكن هناك ملاحظة : لماذا يعود بعد مدة يسير (بضع دقائق) إلى تسميته الأصلية تلقائيا؟

[STRELiTZIA]

هي مسالة هندل : Handle
يعني اذا استطعت الحصول على هندل - مقبض- يمكنك ارسال اوامر وعمل تغييرات على الهدف...

في المثالين فوق:
- يتم البحث على نوافذ مخفية للنظام.
- في حالة وجودها يتم الحصول على مقبض.
- و بعدها عمل تغييرات على الهدف.

---
الدوال : FindWindow او FindWindowEx و SendMessage
---

التغييرات تدوم مع دوام نشاط برنامجك في الذاكرة، و عند غلقه و عمل Refresh او Restart يرجع كل شئ على حالته السابقة.

المرفق يحتوي على برنامجين لقنص معلومات نوافذ النظام او اي برنامج آخر و عمل تغييرات عليه، جربوهم لتفهموا المبدأ... - احدهم مبرمج بدلفي 5.

سؤال : ما معنى مقبض ؟ ابحثوا و اشرحوا ما فهمتم و ليس القيام بعملية نسخ و لصق لتعريفات من هنا و هناك... :D نعم مقابل كل سؤال تطرحونه نطرح تحن سؤال ايضا :D

بالتوفيق ان شاء الله

[nabilkeb]

معنى المقبض ? : لا حول ولا قوة إلا بالله ، رحم الله امرءا عرف قدر نفسه ! ! !

ليحترف الواحد الدلفي ، لا من احتراف كل ما يتعلق بالإعلام الآلي. أنظمة التشغيل و ما حوت . . .
سبحان الله الواحد راهو في بحر لا شاطئ له ! ! !

آسف . سأحول السؤال إلى أهله.