Ahmed_J
-
Posts
733 -
تاريخ الانضمام
-
تاريخ اخر زياره
-
Days Won
1
نوع المحتوي
المنتدى
مكتبة الموقع
معرض الصور
المدونات
الوسائط المتعددة
مشاركات المكتوبه بواسطه Ahmed_J
-
-
السلام عليكم جميعا
استاذ @jjafferr استاذ @ابا جودى استاذ @ازهر عبد العزيز
انا جربت هذه الطريقة (النماذج غير منبثقة) على اربعة شاشات دقة (1280*1024) و(1024*768) و(1366*768)و (1920*1080)
وكانت النتيجة ممتازة جدا (كل شيء تمام والنماذج تعمل مليء كل الشاشات)
* عن تجربتي الخاصة من الصعب الحصول على ذلك من خلال جعل النماذج منبثقة وتعمل بصورة صحيحة على كل الشاشات باختلاف دقتها
تحياتي للجميع
-
1
-
-
السلام عليكم استاذ @ابا جودى
الفكرة هو جعل النموذج يعمل على كل الشاشات باختلاف احجامها ودقة شاشاتها (يمليء الشاشة) وجعل الازرار داخل النموذج تاخذ حجمها ومكانها الطبيعي دون تغيير .
تحياتي لك
-
1
-
-
السلام عليكم
اخي العزيز @hassen hassen
من الافضل ارقاق الملف لغرض التعديل
المهم جرب الطرسقة التالية:
1- افتح قاعدة البيانات بوضع التصميم وافتح محرر الفجول بيسك بالضغط على مفتاحي ALT+F11
2- من قائمة الاوامر بالاعلى اختر Debug ثم اضغط على الامر compil database وهو سيرشدك الى الكود الخطا (اذا كان في خطا بالاكواد)
وشكر لك
-
-
1
-
-
السلام عليكم
1- تم الاخذ بملاحظات الاستاذ @jjafferr وتم تغيير مكان الكود (اصبح بعد التحديث)
2- قائمة الحساب هي منسدله ؟؟؟ المفروض تختار منها
ملف مرفق انظر له بعد التعديل
تحياتي
-
2
-
-
-
1
-
-
اخي العزيز
تستطيع نقل التركيز الى سجل المبلغ عن طريق
وضع الكود عند التغيير في حقل المخزن
تحياتي لك
Me.iAmount.SetFocus-
1
-
-
اخي العزيز
ممكن تبعث صورة عن التقرير في وضع التصميم
وشكرا لك
-
-
1
-
1
-
-
-
استاذي العزيز @jjafferr
نعم واضح جدا حيث يجب اكمال البرنامج من جميع النواحي
شكرا لك استاذي العزيز
بارك الله فيك
-
-
السلام عليكم اساتذتي الاعزاء
في البرنامج المرفق وهو للاستاذ @SEMO.Pa3x وتم التعديل عليه من قبل الاستاذ @jjafferr
كل شيء تمام عند تشغيل البرنامج وتم تجربته على شاشة 1920 * 1080 وشاشة 1366* 768 وهو يعمل بصورة ممتازة
هل من الممكن عن طريق الاكواد عمل مايلي (تم التعديل عليها عن طريق خصائص النموذج ولم تنجح):
1- اريد اخفاء الازرار (التكبير والتصفير والاغلاق) علما انه بخصائص النموذج عاملهم (no)
2- النموذح يمكن طيه بسحب الماوس من الاعلى (يمكن تغيير حجمه) وقابل للنفل هل يمكن تثبيتة بصورة ثابته بالشاشة وجعله غير قابل للنقل
وشكرا لكم
-
1
-
-
السلام عليكم
شكرا لك وبارك الله فيك
-
اخي العزيز @saffar
لدي سؤال حول برنامجك لو سمحت؟ عند التعامل مع البرنامج
* هل يمكن ارسال رسالة نصية لكل طالب بدل ملف pdf عن طريق البرنامج ام لا؟
وشكرا لك
-
استاذ @ابوخليل
انا استخدم اوفيس 2010
وهو يعمل بصورة طبيعية جدا على جهازي
وهذه صورة من جهازي
تحياتي للجميع
-
كل عام وانتم بخير
-
السلام عليكم
اخي العزيز @حلبي
ارجو منك فقط تجربة الملف المرفق اذا كان يعمل على قياس كل الشاشات الي عندك ام لا ؟؟؟
واعلامنا النتيجة
وشكرا
-
اخي العزيز @حلبي
1- انا جربت البرنامج على عدة حواسيب لابتوب وهو يعمل جيدا
لكن الدقة التي لديك 1280 *800 حاول ان تجرب تكبير قياس ارتفاع النموذج واخبرنا النتائج رجاء
2- تم اضافة كود ووحدة نمطية لاخفاء شاشة الاكسسس بدون مشاكل كما في المرفق علما انني اعمل على اكسس 2010
-
1
-
-
استاذ @ابا جودى
المرفق والله هو كدة زي ماحملته من الانترنت لاحد الاخوه
فقط قمت بتكبير قياسات حجم النموذج
ضبط حجم النموذج على الشاشة-.accdb
-
1
-
-
-
السلام عليكم
اخي العزيز محمد @حلبي
هل كانت دقة الشاشة لديك 1024*768 واصبح قصيرا ؟
اكيد في حل لتعديل الوحدة النمطية الخاصة بهذا الشيء من قبل احد الاساتذه في الموقع
اتمنى المساعدة منهم لحل هذه المشكلة
تحياتي للجميع
-
1
-
-
شكرا لك استاذ @kha9009lid
رائع جدا
اتمنى من باقي الاخوة تجربته واعطائنا النتيجة؟
مع العلم انه عند تشغيل البرنامج على وندوز 7 كل شيء تمام وعند تشغيلة على وندوز 10 يصبح فرغ قليل بجانب اطار الشاشة من اليمين واليسار ولا اعرف السبب ؟
وشكرا للجميع
-
1
-
-
السلام عليكم
استاذي العزيز @kha9009lid
افهم من كلامك ان النموذج لايحتاج على تكبير قياساته ؟ وهل هو عندك مليء الشاشة تماما ام لا ؟
شكرا لك
-
1
-
مشكلة عند تغيير حجم الشاشة
في قسم الأكسيس Access
قام بنشر · تم تعديل بواسطه Ahmed_J
السلام عليكم استاذ @صالح حمادي استاذ @jjafferr استاذ @ابا جودى استاذ @ازهر عبد العزيز
الكود يعمل بصورة صحيحة وهو عمل ممتاز جدا ورائع
* فقط في حاجة تحصل لما يكون عندك اكثر من نموذج (عندما تكون في النموذج الواحد حقول كثيرة مثل قاعدة بيانات الموظفين )
- عند فتح قاعدة البيانات على النموذج الاول او عند الانتقال من نموذج الى اخر تظهر (شاشة اشبه بالبيضاء لمدة 2 ثانية ) قارغة وبدون عناصر
ثم تظهر بعد ذلك الحقول (كان النموذج بطيء في فتحه لمدة 2 ثانية)
هل من حل لهذه المشكلة او تسريع عمل فتح النماذج؟
وشكرا لك استاذي العزيز وتحياتي للجميع
Option Compare Database Function salah(frm As Form) On Error Resume Next Dim x, y, X1, Y1 As Integer Dim moyH, moyW As Double Dim obj As Control Dim str As String x = frm.InsideHeight 'ارتفاع النموذج قبل التكبير y = frm.InsideWidth ' عرض النموذج قبل التكبير DoCmd.Maximize X1 = frm.InsideHeight 'ارتفاع النموذج بعد التكبير Y1 = frm.InsideWidth ' عرض النموذج بعد التكبير moyH = X1 / x 'معامل الإرتفاع moyW = Y1 / y ' معامل العرض For Each obj In frm.Controls With obj .Left = .Left * moyW .Top = .Top * moyH .Width = .Width * moyW .Height = .Height * moyH .FontSize = .FontSize * moyW End With Next End Function