kaser906 قام بنشر يناير 3, 2018 قام بنشر يناير 3, 2018 السلام عليكم ورحمة الله وبركاتة الموضوع الذي أطرحه الآن كنت طرحته من قبل مدة طويلة من الزمن في أحد المنتديات وحصلت على إجابه لكنها غير فعالة وغير مرضية حيث كانت تعتمد على إغلاق النموذج وإعادة فتحه من جديد الموضوع باختصار كما هو موضح بالصورة المرفقة المطلوب عند الضغط على زر الأمر يتم إيقاف تنشيط ازرار التنقل بالنموذج وعند الضغط على زر الأمر الأخر يتم تنشيطها من جديد enbld.rar
kaser906 قام بنشر يناير 3, 2018 الكاتب قام بنشر يناير 3, 2018 21 ساعات مضت, أبو آدم said: أخي العزيز إخوتي الفضلاء التطبيق المرفق يغطي كافة أزرار التنقل بين السجلات Navigation Buttons و توليفة حالاتها يغطي Back و Next و New و First و Last مع مربع نص لاظهار عدد السجلات مع توليفة أحواله مع امنياتي بعموم الفائدة و الله من وراء القصد ... استاذي أبو أدم ليس هذا ما أريده اريد الغاء تنشيط ازرار التنقل للنموذج الأساس الواقعة على شريط النموذج من الأسفل والمشار اليها في الصورة أعلاة بالمربع الأسود عند النقر على زر أمر داخل النموذج
Shivan Rekany قام بنشر يناير 3, 2018 قام بنشر يناير 3, 2018 1 ساعه مضت, kaser906 said: اريد الغاء تنشيط ازرار التنقل للنموذج الأساس الواقعة على شريط النموذج من الأسفل والمشار اليها في الصورة أعلاة بالمربع الأسود عند النقر على زر أمر داخل النموذج استأذن من استاذنا ابو ادم اتفضل اليك هذا Private Sub cmdenbld_Click() ' للاخفاء Me.NavigationButtons = False End Sub Private Sub cmdenbld1_Click() ' للاظهار Me.NavigationButtons = True End Sub enbld.rar 1
Amr Ashraf قام بنشر يناير 3, 2018 قام بنشر يناير 3, 2018 اضافة الى ما قال الاساتذة يمكن من خصائص النموذج فى تبويب Format هتلاقى Navigation Buttons خليها No شوف الصورة
kaser906 قام بنشر يناير 3, 2018 الكاتب قام بنشر يناير 3, 2018 4 ساعات مضت, Shivan Rekany said: استأذن من استاذنا ابو ادم اتفضل اليك هذا Private Sub cmdenbld_Click() ' للاخفاء Me.NavigationButtons = False End Sub Private Sub cmdenbld1_Click() ' للاظهار Me.NavigationButtons = True End Sub enbld.rar يعطيك العافيه أستاذ شفان هذا ليس المطلوب اريد فقط تجميد الازرار بدون اخفائها 1 ساعه مضت, Amr Ashraf said: اضافة الى ما قال الاساتذة يمكن من خصائص النموذج فى تبويب Format هتلاقى Navigation Buttons خليها No شوف الصورة ليس هذا هو المطلوب
Amr Ashraf قام بنشر يناير 3, 2018 قام بنشر يناير 3, 2018 اخى الكريم على حد علمى لا يوجد ما يسمى تجميد لأنها ليست زر بالمعنى التقليدى يمكنك عمل Enabled او العكس ولكن يمكن التحكم باظهارها او اخفاءها فقط ... ومتابع اذا كان هناك حل من احد الاخوة
jjafferr قام بنشر يناير 3, 2018 قام بنشر يناير 3, 2018 هذا سطر ، يا موجود بالكامل ، ويا غير موجود بالكامل ، لهذا السبب اخي ابو آدم اقترح البديل جعفر
kaser906 قام بنشر يناير 3, 2018 الكاتب قام بنشر يناير 3, 2018 29 دقائق مضت, Amr Ashraf said: اخى الكريم على حد علمى لا يوجد ما يسمى تجميد لأنها ليست زر بالمعنى التقليدى يمكنك عمل Enabled او العكس ولكن يمكن التحكم باظهارها او اخفاءها فقط ... ومتابع اذا كان هناك حل من احد الاخوة اخي بحسب الشرح الذي بالصورة يعني ان هناك تعليمة برمجية موجودة ولذلك يبقى السؤال هل يمكن الوصول لهذه التعليمة وتوظيفها حسب المطلوب 20 دقائق مضت, jjafferr said: هذا سطر ، يا موجود بالكامل ، ويا غير موجود بالكامل ، هنا السؤال ؟؟؟ الذي يحتاج إجابة الخبراء 1
kaser906 قام بنشر يناير 3, 2018 الكاتب قام بنشر يناير 3, 2018 8 دقائق مضت, jjafferr said: وحصلت على الاجابة إلى الآن الإجابة مش واضحة اريد إجابة غير دبلماسية أما نعم أو لا
jjafferr قام بنشر يناير 3, 2018 قام بنشر يناير 3, 2018 لا يمكن تجزأت السطر هذا ، فإما تُظهره بالكامل ، او تخفيه بالكامل. جعفر
kaser906 قام بنشر يناير 3, 2018 الكاتب قام بنشر يناير 3, 2018 2 دقائق مضت, jjafferr said: لا يمكن تجزأت السطر هذا ، فإما تُظهره بالكامل ، او تخفيه بالكامل. جعفر جميل الآن استطيع أن أطرح السؤال الأخر هل يمكن إيقاف عمل الأزرار بعد النقر على زر أمر بمعنى لو نقرة على زر التالي لايستجيب وعند النقر على زر السابق لايستجب وعند النقر على زر السجل الأول وعند النقر على زر السجل الأخير نفس الشي
jjafferr قام بنشر يناير 3, 2018 قام بنشر يناير 3, 2018 التحكم الوحيد لهذا السطر ، يا موجود بالكامل ، ويا غير موجود بالكامل ، يعني يا ظاهر ، او مخفي يعني نفس الاجابات السابقة جعفر 1
Shivan Rekany قام بنشر يناير 3, 2018 قام بنشر يناير 3, 2018 12 دقائق مضت, kaser906 said: الآن استطيع أن أطرح السؤال الأخر هل يمكن إيقاف عمل الأزرار بعد النقر على زر أمر بمعنى لو نقرة على زر التالي لايستجيب وعند النقر على زر السابق لايستجب وعند النقر على زر السجل الأول وعند النقر على زر السجل الأخير نفس الشي هذا السؤال نفس السؤال الاول وهناك حل لكن شوية صعبة عليك 1
Shivan Rekany قام بنشر يناير 3, 2018 قام بنشر يناير 3, 2018 اتفضل اليك هذا الخدعة لكي تقم بذلك Private Sub cmdenbld_Click() Me.Form.RecordSource = "" Me.id.ControlSource = "" Me.Fname.ControlSource = "" End Sub Private Sub cmdenbld1_Click() Me.Form.RecordSource = "SELECT Tabl_Emp.id, Tabl_Emp.Fname FROM Tabl_Emp; " Me.id.ControlSource = "id" Me.Fname.ControlSource = "fname" End Sub Private Sub Form_Load() Call cmdenbld1_Click End Sub enbld.rar 2
kaser906 قام بنشر يناير 4, 2018 الكاتب قام بنشر يناير 4, 2018 10 ساعات مضت, Shivan Rekany said: اتفضل اليك هذا الخدعة لكي تقم بذلك Private Sub cmdenbld_Click() Me.Form.RecordSource = "" Me.id.ControlSource = "" Me.Fname.ControlSource = "" End Sub Private Sub cmdenbld1_Click() Me.Form.RecordSource = "SELECT Tabl_Emp.id, Tabl_Emp.Fname FROM Tabl_Emp; " Me.id.ControlSource = "id" Me.Fname.ControlSource = "fname" End Sub Private Sub Form_Load() Call cmdenbld1_Click End Sub enbld.rar يعطيك العافية أستاذ شفان الطريقة فعالة لكن توجد بها مشكلة عدم الإضافة او التعديل عند النقر على الزر كل الشكر والتقدير
Shivan Rekany قام بنشر يناير 4, 2018 قام بنشر يناير 4, 2018 9 ساعات مضت, kaser906 said: لكن توجد بها مشكلة عدم الإضافة او التعديل نعم لكن هذا يعود لخصائص نموذج من قبل ان افكر في هذه الطريقة كان جربت كم طرائق لكن وحينئذ انا غيرت خاصية النموذج قفل السجل اي ( Record Locks ) يساوي All Records تم تغير الى No Locks والان مافی المشکلە enbld.rar 2
kaser906 قام بنشر يناير 5, 2018 الكاتب قام بنشر يناير 5, 2018 (معدل) في ١٧/٠٤/١٤٣٩ at 15:55, Shivan Rekany said: نعم لكن هذا يعود لخصائص نموذج من قبل ان افكر في هذه الطريقة كان جربت كم طرائق لكن وحينئذ انا غيرت خاصية النموذج قفل السجل اي ( Record Locks ) يساوي All Records تم تغير الى No Locks والان مافی المشکلە enbld.rar نفس الشي أستاذ شفان بعد النقر على زر إيقاف لايمكن التعديل على سجل ولا يمكن إضافة سجل جديد أعتقد أن سأكتفي باقتراحك الأول Private Sub cmdenbld_Click() ' للاخفاء Me.NavigationButtons = False End Sub Private Sub cmdenbld1_Click() ' للاظهار Me.NavigationButtons = True End Sub تم تعديل يناير 5, 2018 بواسطه kaser906
Shivan Rekany قام بنشر يناير 5, 2018 قام بنشر يناير 5, 2018 4 ساعات مضت, kaser906 said: بعد النقر على زر إيقاف لايمكن التعديل على سجل ولا يمكن إضافة سجل جديد في الاول اذا تضغط او لا تضغط على الزر لا يمكنك ان تعمل تعديل او تضيف له سجل جديد لكن في المشاركتي الاخيرة يمكنك ان تضيف او تعمل تعديل على السجلات لكن قبل ان تضغط على الايقاف وبعد ان تضغط على الايقاف سيكون مصدر النموذج بيساوي لا شيء اي لذلك لا تقدر تعمل اي شيء 1
عبد الفتاح كيرة قام بنشر يناير 7, 2018 قام بنشر يناير 7, 2018 الإخفاء جملة أو الإظهار جملة هذا هو الواقع أما عدم التمكين فيكون لزر السابق عندما لا يكون هناك سجل سابق ولزر التالى عندما تنتهى السجلات ولا يكون هناك سجل تال أما مع وجود السجلات السابقة و اللاحقة فلا معنى لعدم تمكين الأزرار مع إمكانية التنقل والله أعلم 1
Shivan Rekany قام بنشر يناير 7, 2018 قام بنشر يناير 7, 2018 20 دقائق مضت, عبد الفتاح كيرة said: أما مع وجود السجلات السابقة و اللاحقة فلا معنى لعدم تمكين الأزرار مع إمكانية التنقل نعم بالضبط لذلك قمنا باعطاء الطريقة الثانية اي تغيرنا مصدر النموذج بلا شيء 2
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.