delphi4arab منتديات دلفي للعرب
الدرس رقم 9 - نسخة قابلة للطباعة

+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : الدرس رقم 9 (/showthread.php?tid=994)



الدرس رقم 9 - STRELiTZIA - 27-06-2009

السلام عليكم و رحمة الله
سؤال من صديق فضلت ان اطرحه هنا لتعم الفائدة Big Grin
إقتباس :لكن في حالة استعمال الرسورس، لم تنفع الدالة GetWindowText فلا يوجد Handle للـ Edit فما العمل؟
للحصول على مقبض Handle اي مكون نستعمل دالة : GetItem بطريقتين :
1- مستقلة :
كود :
hGetNameEdt := GetItem(ID_NAME_EDIT);

2- مشتركة :

كود :
GetWindowText(GetItem(ID_NAME_EDIT), param, param);


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


الدرس رقم 9 - kachwahed - 27-06-2009

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


الدرس رقم 9 - kachwahed - 28-06-2009

تقصد GetDlgItem، مثل:
PHP كود :
GetWindowText(GetDlgItem(hWnd, ID_NAME_EDIT), Str, 255); 
كي تعم الفائدة Big Grin



الدرس رقم 9 - Ahmed18 - 13-11-2010

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


الدرس رقم 9 - kachwahed - 13-11-2010

إقتباس :لا يوجد شئ اسمة GetItem !!
لذلك قلتُ:
إقتباس :تقصد GetDlgItem،
زلة أصابع Big Grin
إقتباس :والباراميتر الثاني هو Integer ؟
أجل، IDs معرفة كـ Integer
كود :
ID_NAME_EDIT = 200;
أظن يمكن الاستدعاء بالاسم مع التغليف بـ PAnsiChar.



الدرس رقم 9 - Ahmed18 - 16-11-2010

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

لكن هناك مشكلة:
لدي مكون TImage و**** ان احصل علي مقبض هذا ال Control المسمي imgBtnMainPlugins
فقمت باعطائة ال ID رقم 2000 وعرفتة في ال Const واستخدمت الكود التالي :
كود :
type imgBtnMainPlugins: TImage; const imgBtnMainPlugins = 2000; DlgHand := GetDlgItem(FormMain.Handle, 2000); GetWindowRect(DlgHand, lprect);

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