بســم الله الـرحمــن الرحيــم
ارجو من خبراء المنتدى النادر الرائع مساعدتي في جعل النافذة (الاصلية)المنبثقة منها نافذة جديدة ،جعلها غير مفعلة او غير مرئية الا ان ينتهي العمل من النافذة الثانوية\
وانا ممتن لكم
وجزيل الشكر مقدما
بســم الله الـرحمــن الرحيــم
ارجو من خبراء المنتدى النادر الرائع مساعدتي في جعل النافذة (الاصلية)المنبثقة منها نافذة جديدة ،جعلها غير مفعلة او غير مرئية الا ان ينتهي العمل من النافذة الثانوية\
وانا ممتن لكم
وجزيل الشكر مقدما
[السلام عليكــم ورحمـة الله وبركاتــه ،،
الطريقة سهلة للغاية
في زر التحكم للنافذة الاصلية تكتب الكود هذا
do form secondaire.scx
thisform.release
ام في زر الخروج من النافذة الثانوية
do form principale.scx
thisform.release
*------------------------*
هذا ما أستطعت فهمه من سؤالك
<<--DON CORLEONNE-->>
السلام عليكم ورحمة الله
شكرا اخ ياسين المحترم وهذا بالظبط ما قصدته من سؤالي
وانا قد جربت هذه الطريقة مسبقا لكن وجدت ان المستخدم عند استعمال ( x)غلق من النافذة لن يتنفذ كود التشغيل والغلق.
اذا امكن طريقة تضمن الرجوع الى النافذة الاولى حتى عند الغلق من x.
ومشكورين على الجهود العالية
بســم الله الـرحمــن الرحيــم
و السلام عليكــم ورحمـة الله وبركاتــه ،،
ردا على سؤالك هو كالتالي
يجب عليك ان تلغي الزر x باستعمال closable كما هو موضح في الصورة
<<--DON CORLEONNE-->>
شكرا جزيلا اخي الغالي
حركة متميزة
ادعو الله ان يوفقك في هذا المجال
السلام عليكــم ورحمـة الله وبركاتــه ،،
عزيزي... طبعا ستعمل الطريقة السابقة بشكل صحيح وسليم 100% ولكن عندما تعود للنموذج الاول سترجع لنقطة الصفر كون انك قمت بعمل Release لكامل النموذج
فعلى افتراض ان النموذج الاول سيعتمد على معلومة معادة من النموذج الثاني فأين سيقوم بتخزينها عند الخروج من النموذج الثاني!!!!
لذا لربما من الافضل استخدام الامر Hide + Show
Thisform.Hide() Do Form MySecondForm thisform.Show()
وما عليك الا تغيير الـ WindowsType في النموذج الثاني ليكون Modal
وعلى فرض انك تريد فعلا ارجاع قيمة معينة من النموذج الثاني للنموذج الاول فتستطيع ان تخزن القيمة المعادة لمتغير ما على النحو التالي
Thisform.Hide() local lnTest lnTest=0 Do Form MySecondForm to lnTest thisform.Show()
وهنا عليك اضافة الامر التالي في اجراء Unload في النموذج الثاني لتتم اعادته للنموذج الاول
Return AnyValue
مع التحية
تم تعديل هذه المشاركة بواسطة Shadowz في 20 يونيو 2009 في 04:54
أستغفر الله العظيم و أتوب إليه