الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

كيف يستعمل المكون TIWTreeView

مغلق
بدأه joo في 16 سبتمبر 2006 · 3 رد · 592 مشاهدة · في لغة Delphi
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم

أريد التعامل أثناء زمن التنفيذ مع البنية TIWTreeView ولكن الHelp لا يحوي أية معلومات عنها

وهي تختلف في التعامل عن البنية TTreeView

فساعدوني بمثال بسيط واضح بأسرع وقت ممكن ,وجزاكم الله عني كل خير

وشكراً لكم مسبقاً

#2

بضع ثواني من البحث في 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

===

اقتباس
عبيد الهوى يحكمون البـلاد ***** ويحكمهــم كلّهـــم درهــــــم

و تقتـادهـم شهـوة لا تنــام ***** وهـــم فـي جـهالتهــم نــــوّم

ففــي كـــلّ ناحيــة ظـالـــم ***** غبــــــيّ يسـلـّطــــه أظلـــم

أيا من شبعتم على جوعــنا ***** وجـــوع بنينـا ألـم تتخمـــوا ؟

ألم تفهموا غضبة الكادحين ***** على الظلـم ؟ لا بدّ أن تفهموا

البردوني "نحن و الحاكمون "

#3

شكراً لك أخي العزيز

ولكني أريد مثالاً يوضح لي كيف أستطيع أن أضيف أبن فرعي للشجرة (وليس جذراً) في زمن التنفيذ

لقد أمضيت وقتاً طويلاً و أنا أحاول معرفة كيف بأمكاني القيام بذلك لكني لم أنجح

وشكرا مسبقا لكل من سيحاول مساعدتي بمثال

#4

لا أعلم أين الصعوبة؟

لم أقرأ في هذا المجال من قبل و أمضيت خمس دقائق قرأت فيها أجزاء من الـ 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

===

اقتباس
عبيد الهوى يحكمون البـلاد ***** ويحكمهــم كلّهـــم درهــــــم

و تقتـادهـم شهـوة لا تنــام ***** وهـــم فـي جـهالتهــم نــــوّم

ففــي كـــلّ ناحيــة ظـالـــم ***** غبــــــيّ يسـلـّطــــه أظلـــم

أيا من شبعتم على جوعــنا ***** وجـــوع بنينـا ألـم تتخمـــوا ؟

ألم تفهموا غضبة الكادحين ***** على الظلـم ؟ لا بدّ أن تفهموا

البردوني "نحن و الحاكمون "

هذا الموضوع مغلق.

مواضيع مشابهة