الحفظ بعد الطباعة

السلام عليكم ورحمة الله وبركاته أعضاء ومشرفى منتدانا العظيم لكم تحياتى

من الواضح أننى لم أوضح سؤالى لذلك لم أجد رد 0000 وسوف أسرد سؤالى مرة أخرى

لديه قاعدة بيانات لمطعم وبها نموذج مبيعات به بيانات العميل وبداخله نموذج فرعى للفاتورة المطلوب هو بعد إدخال بيانات الفاتورة وطباعتها لايمكن للمستخدم الدخول على نفس الفاتورة وتغيير بيانات بها وفى نفس الوقت يستطيع أن يقوم بعمل فواتير أخرى من داخل النموذج

أرجو أن يكون سؤالى واضح الآن وشكراً.

اخي الفاضل مازن مصطفى

تستطيع عمل ذلك بكل سهوله من خلال الكود التالي الذي يوضع في النموذج الرئيسي والفرعي في حدث النموذج الحالي

Private Sub Form_Current()
If Me.Moveable Then
   Me.AllowEdits = False
 End If
End Sub

وهذا مثال حاول التعديل او المسح في اي حقل من الحقول بعد الإضافه ولكن يمكنك اضافة بيانات جديده

zaNo_Edit.rar

السلام عليكم

الكود يؤدي إلى النتيجة المرغوبة ولكن السؤال ( استفسار واستفهام ليس أكثر ) ما علاقة movbeable بهذا الحدث

أليست هذه الدالة من اجل عدم تحريك الفورم ؟

وشكراُ للإجابة

ملحوظة

أعتقد أن عدم امكانية اضافة سجلات جديده في فاتورة تم طباعتها ومحاسبة العميل عليها غير وارد وان كانت وارده فيجب الاضافة ولكن بشروط وصلاحيات

نعم اخي عمار زايد كلامك صحيح هذه الدالة تستخدم لتحريك النموذج ولكن لا تأتي لوحدها بل معها دالة ثانيه Move

If Forms(0).Moveable Then
	Forms(0).Move  Left:=0, Top:=0, Width:=400, Height:=300
Else
	MsgBox "لا يمكن تحريك النموذج"

وبالإمكان ايضا استخدام AllowEdits لوحدها مباشرة بدون مشكله ولكن في المثال قيدنا استخدامها بشرط الحركه ايضا

بسم الله الرحمن الرحيم

الأخت الكريمة زهرة المنتدى تحية وشكر وأمتنان خالص على مرورك الكريم وحل المشكلة وليس هذا غريباً على الأمبراطورة وجارى التحميل والتجربة كما ودعواتى لكى دائماً بالسمو العالى .

كما أشكر أخوانى الكرام كذلك على مرورهم ونصائحهم الأخ محمد فؤاد تركى والأخ عمار زايد اللهم أجعلكم جميعاً ثغراً لهذا المنتدى ويجعل كل حرف تكتبونه حسنة تزيد من حسناتكم بإذن الله.