delphi4arab منتديات دلفي للعرب
كيف أجعل النوافذ ف نافذه وآحده ؟ - نسخة قابلة للطباعة

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



كيف أجعل النوافذ ف نافذه وآحده ؟ - delphi4you - 07-05-2008

السلام عليكم ورحمه الله وبركآته

ربما فشلت في صياغه عنوان الموضوع

لكن لدي استفسار بسيط ألا وهو

لاحظت في البرامج قائمه لست فيو

وقآموا بوضع الوظائف في نافذه واحد

للتوضيح أكثر

شاهدوا هذه الصورة

[صورة: c2a0e44.Untitled.gif]

كيف استطيع وضع ايقونات مع الاسماء في قائمه لست فيو ؟

وكيف أستطيع ربط الزر من قائمه لست فيو مع قروب بوكس الخاصه به ؟

وجزآكم الله خيرا


كيف أجعل النوافذ ف نافذه وآحده ؟ - محمد عبد العزيز - 07-05-2008


يمكن القيام بالامر باكثر من طريقة
مثلا استعمال اكثر من Panel وتخفيها كلها بتغيير الخاصية Visible الى False
وعندما تريد اظهارها يكفي تغيير Visible الى True

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



كيف أجعل النوافذ ف نافذه وآحده ؟ - delphi4you - 07-05-2008

تشكر على كجهودك يا اخي

ولاكن السؤال لم تجآوب عليه بشكل كآمل

جربت طريقتك visible false اختفت النافذه نعم

ولاكن عندما اظغط على الزر الأول يظهر القروب بوكس

وعندما اظغط على الزر الثاني يقوم القروب بوكس 2 بالركوب والتداخل على قروب بوكس 1

**** أن أظغط على الزر الثاني فيختفي القروب البوكس 1 ويظهر 2 كما في الصورة ؟

وجزاك الله خيرا


كيف أجعل النوافذ ف نافذه وآحده ؟ - محمد عبد العزيز - 07-05-2008


قبل ان تظهر الثاني عليك ان تخفي الظاهر
اعطيك مثال
لديك 4
عند الضغط على اي زر تخفي الجميع وتظهر فقط الخاص بالزر
فهمت ؟



كيف أجعل النوافذ ف نافذه وآحده ؟ - delphi4you - 07-05-2008

نعم فهمتك يادلتا

أررررررجوك أن لاتغضب علي فأنا مبتدئ !

سأحاول وسأوافيكم بالنتائج


كيف أجعل النوافذ ف نافذه وآحده ؟ - delphi4you - 08-05-2008

للأسف الشديد لا أعرف كيف أقوم بعملها

لقد غيرت خاصيتها visible الى false واختفت

لاكن **** ربط الزر من قائمه لست فيو بالقروب بوكس الخاص به

كيف يتم ذلك ؟

**** أن تشرحو لي فأنا مبتدئ


كيف أجعل النوافذ ف نافذه وآحده ؟ - merouane - 08-05-2008

أرفق محاولتك


كيف أجعل النوافذ ف نافذه وآحده ؟ - delphi4you - 08-05-2008

ها أنا أرفقت لك محآولتي أتـمنى حل المشكل

http://www.mediafire.com/?zymcfxccvdu


كيف أجعل النوافذ ف نافذه وآحده ؟ - merouane - 08-05-2008

السلام عليكم

الخطأ : لقد جعلت GroupBox تابعة للـ GroupBox التي قبلها
كود :
http://up104.arabsh.com/my/572c65d.gif

أي عند إخفاء الأب GroupBox1 سيختفي GroupBox2 ويليه GroupBox3 ويليه GroupBox4
ولا ينفع إظهار GroupBox3 في حين أنه تابع للـ GroupBox1 الذي هو مخفي

الصواب

كود :
http://up104.arabsh.com/my/8b884d3.gif
كود :
procedure TForm15.ListView1Click(Sender: TObject); begin GroupBox1.Visible := False; GroupBox2.Visible := False; GroupBox3.Visible := False; GroupBox4.Visible := False; case ListView1.ItemIndex of 0: GroupBox1.Visible:=True; 1: GroupBox2.Visible:=True; 2: GroupBox3.Visible:=True; 3: GroupBox4.Visible:=True; end; end;

يجب أن نعرف أين نضع مكوناتنا

التصحيح في المرفقات

تحياتي Smile



كيف أجعل النوافذ ف نافذه وآحده ؟ - delphi4you - 09-05-2008

جزآك الله خيرآ يا اخي مروآن

وأنا فعلا فهمت كلآمك

لأنني عندما حآولت سحب قروب بوكس 2 من محيط قروب بوكس 1 لم أستطيع تحريكه خارج النطاق

وهذا دليل على أنه تآبع له

جزآك الله خيرا يا اخي