الدرس رقم 9

[STRELiTZIA]

السلام عليكم و رحمة الله
سؤال من صديق فضلت ان اطرحه هنا لتعم الفائدة

لكن في حالة استعمال الرسورس، لم تنفع الدالة GetWindowText فلا يوجد Handle للـ Edit فما العمل؟

للحصول على مقبض Handle اي مكون نستعمل دالة : GetItem بطريقتين :
1- مستقلة :

كود :

hGetNameEdt := GetItem(ID_NAME_EDIT);

2- مشتركة :

كود :

GetWindowText(GetItem(ID_NAME_EDIT), param, param);

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

[kachwahed]

أنا صاحب السؤال
بارك الله فيك أخي STRELiTZIA، وعذرا على الإزعاج.

[kachwahed]

تقصد GetDlgItem، مثل:

PHP كود :

GetWindowText(GetDlgItem(hWnd, ID_NAME_EDIT), Str, 255); 


كي تعم الفائدة

[Ahmed18]

هل الموضوع بة خطأ يا اخواني ؟
لا يوجد شئ اسمة GetItem !!
ايضا كيف يمكن استخدام الدالة بهذا الشكل
GetDlgItem(hWnd, ID_NAME_EDIT)
والباراميتر الثاني هو Integer ؟

[kachwahed]

لا يوجد شئ اسمة GetItem !!

لذلك قلتُ:

تقصد GetDlgItem،

زلة أصابع

والباراميتر الثاني هو Integer ؟

أجل، IDs معرفة كـ Integer

كود :

ID_NAME_EDIT = 200;

أظن يمكن الاستدعاء بالاسم مع التغليف بـ PAnsiChar.

[Ahmed18]

شكرا أخي كاش واحد.

لكن هناك مشكلة:
لدي مكون TImage و**** ان احصل علي مقبض هذا ال Control المسمي imgBtnMainPlugins
فقمت باعطائة ال ID رقم 2000 وعرفتة في ال Const واستخدمت الكود التالي :

كود :

type imgBtnMainPlugins: TImage; const imgBtnMainPlugins = 2000; DlgHand := GetDlgItem(FormMain.Handle, 2000); GetWindowRect(DlgHand, lprect);

لكن دائما تفشل الدالة GetDlgItem وترجع 0 في ال DlgHand