السلام عليكم
أريد التعامل أثناء زمن التنفيذ مع البنية TIWTreeView ولكن الHelp لا يحوي أية معلومات عنها
وهي تختلف في التعامل عن البنية TTreeView
فساعدوني بمثال بسيط واضح بأسرع وقت ممكن ,وجزاكم الله عني كل خير
وشكراً لكم مسبقاً
السلام عليكم
أريد التعامل أثناء زمن التنفيذ مع البنية TIWTreeView ولكن الHelp لا يحوي أية معلومات عنها
وهي تختلف في التعامل عن البنية TTreeView
فساعدوني بمثال بسيط واضح بأسرع وقت ممكن ,وجزاكم الله عني كل خير
وشكراً لكم مسبقاً
بضع ثواني من البحث في google
http://www.delphipages.com/threads/thread....65&G=104863
وستجد فيه الوصلة
http://downloads.atozedsoftware.com/intraw...enceGuide70.zip
عبارة عن ملف Help ..
"First they ignore you, then they laugh at you, then they attack you, then you win"
===
اقتباسحُكَّامُـنَا إِنْ تَصَـدّوا لِلْحِمَــى اقْتَحَمُـوا ***** وَإِنْ تَصَدَّى لَـهُ المُسْتَعْمِـرُ انْسَحَبُـوا
هُمْ يَفْرشـُونَ لِجَيْـشِ الغَــزْوِ أَعْيُنَـهُـمْ ***** وَيَدَّعُــونَ وُثُـوبَـاً قَـبْـلَ أَنْ يَثِـبُــوا
الحَاكِمُـونَ و«وَاشُنْـطُـنْ» حُكُومَتُـهُـمْ ***** وَاللامِعُــونَ وَمَـا شَعَّـوا وَلا غَرَبُــوا
القَاتِلُـــونَ نُبُــوغَ الشَّـعْــبِ تَرْضِـيَـــةً ***** لِلْمُعْتَدِيــنَ وَمَـا أَجْـدَتْـهُـمُ الـقُــرَبُ
لَهُمْ شُمُـوخُ «المُثَنَّـى» ظَاهِـرَاً وَلَهُـمْ ***** هَـوَىً إِلَـى بَابَـك الخَرْمِـيّ يُنْتَسَـبُ
البردوني "أبو تمام وعروبة اليوم" 1971
===
اقتباسعبيد الهوى يحكمون البـلاد ***** ويحكمهــم كلّهـــم درهــــــمو تقتـادهـم شهـوة لا تنــام ***** وهـــم فـي جـهالتهــم نــــوّم
ففــي كـــلّ ناحيــة ظـالـــم ***** غبــــــيّ يسـلـّطــــه أظلـــم
أيا من شبعتم على جوعــنا ***** وجـــوع بنينـا ألـم تتخمـــوا ؟
ألم تفهموا غضبة الكادحين ***** على الظلـم ؟ لا بدّ أن تفهموا
البردوني "نحن و الحاكمون "
شكراً لك أخي العزيز
ولكني أريد مثالاً يوضح لي كيف أستطيع أن أضيف أبن فرعي للشجرة (وليس جذراً) في زمن التنفيذ
لقد أمضيت وقتاً طويلاً و أنا أحاول معرفة كيف بأمكاني القيام بذلك لكني لم أنجح
وشكرا مسبقا لكل من سيحاول مساعدتي بمثال
لا أعلم أين الصعوبة؟
لم أقرأ في هذا المجال من قبل و أمضيت خمس دقائق قرأت فيها أجزاء من الـ IntraWeb Help و لم ألحظ أي صعوبة فيه ...
اقتباسولكني أريد مثالاً يوضح لي كيف أستطيع أن أضيف أبن فرعي للشجرة (وليس جذراً) في زمن التنفيذلقد أمضيت وقتاً طويلاً و أنا أحاول معرفة كيف بأمكاني القيام بذلك لكني لم أنجح
أظن أنك رأيت هذا المثال في الملف الذي أشرت إليه :
with IWTreeViewItems1.Add do begin Caption := 'I''m a new item !!!'; Hint := 'Get the mouse off me !!!'; end;
لماذا لم تذكر المحاولات التي قمت بها ؟؟
ما هي الطريقة التي تنشئ بها أبناء فرعييين في شجرة عادية ؟؟
لا أعلم لماذا الكثيرين يتقفون عندما يواجهون شئ جديد عليهم منتظرين أمثلة جاهزة .. كيف تبرمجون إذاً ؟؟
هذا مثال بسيط سيحتاج لتعديلات ليصبح أكثر دقة وأكثر فعالية ..
var MyTreeNode1:TIWTreeViewItem; implementation .... // On TIWButton Click procedure TformMain.IWButton2Click(Sender: TObject); begin try MyTreeNode1:=TIWTreeViewItem.Create(IWTreeView1.Items); with MyTreeNode1 do begin Caption := 'I am tem no 1 !!!'; Hint := 'Get the mouse off me !!!'; with subitems.Add do begin Caption := 'I am item no 1-1 !!!'; Hint := 'Get the mouse off me !!!'; end; with subitems.Add do begin Caption := 'I am item no 1-2 !!!'; Hint := 'Get the mouse off me !!!'; end; end; except //Rais an exception end; end; // On TformMain, FormDestroy procedure TformMain.IWAppFormDestroy(Sender: TObject); begin MyTreeNode1.Free; end;
الفكرة لا تفرق كثيراً عن الـ TTreeView ...
بإمكانك تغيير الكود السابق حسب ما يناسب برنامج ..
طبعاً بالإمكان استخدام الكود الموجود في الـ Help بدلاً من تعريف متغير جديد ..
عليك قراءة كل معلومة وكل سطر وكل كلمة في الـ Help الموجود في الملف الذي أشرت إليه في ردي السابق ...
"First they ignore you, then they laugh at you, then they attack you, then you win"
===
اقتباسحُكَّامُـنَا إِنْ تَصَـدّوا لِلْحِمَــى اقْتَحَمُـوا ***** وَإِنْ تَصَدَّى لَـهُ المُسْتَعْمِـرُ انْسَحَبُـوا
هُمْ يَفْرشـُونَ لِجَيْـشِ الغَــزْوِ أَعْيُنَـهُـمْ ***** وَيَدَّعُــونَ وُثُـوبَـاً قَـبْـلَ أَنْ يَثِـبُــوا
الحَاكِمُـونَ و«وَاشُنْـطُـنْ» حُكُومَتُـهُـمْ ***** وَاللامِعُــونَ وَمَـا شَعَّـوا وَلا غَرَبُــوا
القَاتِلُـــونَ نُبُــوغَ الشَّـعْــبِ تَرْضِـيَـــةً ***** لِلْمُعْتَدِيــنَ وَمَـا أَجْـدَتْـهُـمُ الـقُــرَبُ
لَهُمْ شُمُـوخُ «المُثَنَّـى» ظَاهِـرَاً وَلَهُـمْ ***** هَـوَىً إِلَـى بَابَـك الخَرْمِـيّ يُنْتَسَـبُ
البردوني "أبو تمام وعروبة اليوم" 1971
===
اقتباسعبيد الهوى يحكمون البـلاد ***** ويحكمهــم كلّهـــم درهــــــمو تقتـادهـم شهـوة لا تنــام ***** وهـــم فـي جـهالتهــم نــــوّم
ففــي كـــلّ ناحيــة ظـالـــم ***** غبــــــيّ يسـلـّطــــه أظلـــم
أيا من شبعتم على جوعــنا ***** وجـــوع بنينـا ألـم تتخمـــوا ؟
ألم تفهموا غضبة الكادحين ***** على الظلـم ؟ لا بدّ أن تفهموا
البردوني "نحن و الحاكمون "
هذا الموضوع مغلق.