السلام عليكم ورحمة الله وبركاته
توجد خاصية Desktop في الشاشة Screen و قيمتها الافتراضية False و لم استطع تغييرها الى True لانها غير مفعلة معطلة لا اعلم هل لان نسخة الفوكس توجد بها بعض الخصائص الناقصة ام لا للعلم نسختي التاسعة SP2
وللعلم الخاصية غير مفعلة في قائمة الخصائص Properties
وعند كتابة الامر
screen.Desktop=t
وتنفيذه تعطينا رسالة خطأ
Property DESKTOP is read-only
سقوط الإنسان ليس فشلاً، ولكن الفشل أن يبقى حيث سقط
اخي العزيز
هنالك بعض الخصائص ليس مفعلة لجميع العناصر
ويمكن تميزيها من خلال التشغيل او الإيقاف
وهذة الخاصية المذكورة خاصة بالنموذج
السلام عليكم...
اذا كنت تعني شاشة الفوكس برو الرئيسية ... فطبيعتها Desktop
ولا يمكن تغيير هذه الخاصية أبدا بعكس النماذج الداخلية التي تستطيع أن تتحكم بها كما شئت
وتستطيع الاستغناء عنها نهائياً باستخدام نموذج عادي تغير خاصية الـ ShowWindow فيه
الى As Top-Level Form
أستغفر الله العظيم و أتوب إليه
شكرا على مروركم اخوتي
طيب كيف اخفي نافذة الفوكس عند تشغبل منظومة قمت بها بحيث يكون سطح المكتب الظاهر وراء الفورم ؟
سقوط الإنسان ليس فشلاً، ولكن الفشل أن يبقى حيث سقط
قم بعمل برنامج لنسميه Start مثلا
هذا البرنامج سيكون مسؤولا عن عملية بدء النظام وعملية اقفاله....
ضع فيه الكود التالي :
SET DEFAULT TO JUSTPATH(SYS(16)) _SCREEN.VISIBLE=.F. SET TALK OFF ON SHUTDOWN _ShutDown() DO FORM MainForm READ EVENTS FUNCTION _ShutDown() ON SHUTDOWN CLEAR EVENTS IF _VFP.STARTMODE>0 QUIT ENDIF ENDFUNC
ثم قم بعمل نموذج واعطه اسم MainForm وغير الخصائص التالية فيه
ShowWindow = 2- As Top Level Form WindowState= 2- Maximized
وفي اجراء Unload ضع الأمر Quit
أستغفر الله العظيم و أتوب إليه
اجمل شي تفاعل الأعضاء
ثوان كان احدهم واولهم اخي عبدالله شكراً لك
اخي العزيز أكرم
اضافة للأخ الكريم عبدالله ومثالهٌ الرائع الذي يجب ان تستفاد منه لأكثر من حاله
في النموذج الرئيسي الذي تستخدمهٌ في الحدث
activit
يكفي اضافة هذا الإيعاز
_SCREEN.VISIBLE=.F.
ويمكن تشغيلهٌ عند عرض التقارير بتغيير حاله الئ .T.
وارجاعها الى
_SCREEN.VISIBLE=.F.
السلام عليكم ورحمة الله وبركاته
شكرا للاخوين العزيزين عبدالله و اسد
1. اخي عبدالله تم التجربة بنجاح لكن مع الفورم الرئيسي الذي يظهر عند التشغيل و عند استدعاء فورم الفرعي لا يظهر .
اخي عبدالله ممكن تشرحلنا عمل الكود اللي كتبته الصراحة في حاجات جديدة على لم افهمها ممكن لو شرحة عمل الكود اقدر استخدمه في الفورم الفرعي
2. اخي اسد ممكن توضح اكثر لان امر Screen.visible = t يقوم بإخفاء الكامل
تحياتي لكم
تم تعديل هذه المشاركة بواسطة اكرم_2008 في 7 فبراير 2016 في 17:14
سقوط الإنسان ليس فشلاً، ولكن الفشل أن يبقى حيث سقط
وعليكم السلام... واهلا بالشباب
عزيزي أكرم
النماذج الداخلية تحتاج أن تغير فيها الـ ShowWindow كما النموذج الرئيسي
فكما اخترنا للنموذج الأول أن يكون As Top Level Form
يجب أن نحدد النماذج التالية لتصبح in Top Level Form
وبعد ان تحدد النماذج الفرعية كل مع عليك استخدامه لاستداعاء النموذج هو
Do Form YourFormName
أما بالنسبة لما تبقى :
READ EVENTS
تعتبر نقطة تفاعل المستخدم مع البرنامج الذي قمنا بتصميمه... أي أننا بعد أن نضع كافة الاعدادات التي نرغب بها وبعد استدعاء النموذج الرئيسي نقول له هنا نبدأ بالظهور
CLEAR EVENTS
هي نقطة التوقف استعداداً للخروج من البرنامج
ON SHUTDOWN _ShutDown()
يفيد هذا الأمر بأنه يجب تنفيد الاجراء ShutDown_ الذي قمنا بانشاؤه عند محاولة اقفال البرنامج
وبذلك عندما تعطي الفوكس برو الأمر Quitسيقوم بعملية الخروج مرورا بالاجراء الخاص بنا
مع التحية
أستغفر الله العظيم و أتوب إليه
اخي العزيز
هذا الامر هو للشاشة الرئيسية
في حال كانت القيمة .T.
تكون الشاشة موجودة او ظاهرة
اما في حال كانت القيمة .F.
تكون مخفية ولايمكن مشاهدتها
ويجب مراعاة الإعدادات الآخرة المتوافقة في الإظهار والاخفاء
