تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
ارسال بيانات من فورم الى فورم اخر مفتوح باكثر من نسخة.
#1
السلام عليكم 

لدي برنامج مبيعات ... اريد ان اضيف خيار فتح اكثر من فاتورة في نفس الوقت

يعني لو كان لدي form1 هو فورم الفاتورة ... انا اقوم بالسماح للمستخدم 
بفتح اكثر من نسخة للفورم ١ فمن الممكن ان يفتح المستخدم نفس الفورم 
٣ مرات مثلا ....

لكن عند فتح الفورم و في حدث load لل form1 اقوم بفتح فورم اخر XX يحتوي 
على ٢ من ال buttons يختار منها المستخدم اذا الفاتورة الجديدة ستباع باسعار الجملة 
ام باسعار التجزئة.

السؤال هنا كيف استطيع ارجاع القيمة من الفورم  XX الى الفورم الذي تم فتحة في الاخر 
دون التاثير على القيمة في الفورمات المفتوحه مسبقا .

انا استخدم الكود الحالي لكن يقوم بارسال القيم لجميع الفورمات المفتوحة ولليس اخر فورم.

الكود الخاص في الفورم XX لل button ١
PHP كود :
       For Each CurrentForm As Form In Application.OpenForms
            If CurrentForm
.Name "Sales_screen" Then
                Dim Form2Instance 
As Sales_screen DirectCast(CurrentFormSales_screen)
 
               Form2Instance.Invoice_type 0
            End 
If
 
       Next 
 

الرد }}}
تم الشكر بواسطة: ابراهيم ايبو , اسامه الهرماوي
#2
(15-12-19, 04:24 AM)Rabeea Qbaha كتب :
السلام عليكم 

لدي برنامج مبيعات ... اريد ان اضيف خيار فتح اكثر من فاتورة في نفس الوقت

يعني لو كان لدي form1 هو فورم الفاتورة ... انا اقوم بالسماح للمستخدم 
بفتح اكثر من نسخة للفورم ١ فمن الممكن ان يفتح المستخدم نفس الفورم 
٣ مرات مثلا ....

لكن عند فتح الفورم و في حدث load لل form1 اقوم بفتح فورم اخر XX يحتوي 
على ٢ من ال buttons يختار منها المستخدم اذا الفاتورة الجديدة ستباع باسعار الجملة 
ام باسعار التجزئة.

السؤال هنا كيف استطيع ارجاع القيمة من الفورم  XX الى الفورم الذي تم فتحة في الاخر 
دون التاثير على القيمة في الفورمات المفتوحه مسبقا .

انا استخدم الكود الحالي لكن يقوم بارسال القيم لجميع الفورمات المفتوحة ولليس اخر فورم.

الكود الخاص في الفورم XX لل button ١
PHP كود :
       For Each CurrentForm As Form In Application.OpenForms
            If CurrentForm
.Name "Sales_screen" Then
                Dim Form2Instance 
As Sales_screen DirectCast(CurrentFormSales_screen)
 
               Form2Instance.Invoice_type 0
            End 
If
 
       Next 
 

هذا الكود لفتح اكثر من فاتوره
كود :
Dim frm As New Sales_screen
frm.Show()

هذا كود فاتوره جديده سوف تفتح نافذه خيارات كما طلبت
كود :
Dim Invoice_type As Integer

Private Sub Sales_screen_Load(sender As Object, e As EventArgs) Handles MyBase.Load
   Using xx As New XX
       If xx.ShowDialog(Me) = Windows.Forms.DialogResult.OK Then
           Invoice_type = xx.selection
           Me.Text = Invoice_type
       Else
           Me.Close()
       End If
   End Using
End Sub

هذا كود نافذه الخيارات
كود :
Public selection As Integer

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
   selection = 1
   Me.DialogResult = Windows.Forms.DialogResult.OK
End Sub

Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
   selection = 2
   Me.DialogResult = Windows.Forms.DialogResult.OK
End Sub
الرد }}}
#3
شكرا جزيلا صديقي 
زاد الله علما.

الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [VB.NET] اخذ نسخة احتياطية asdfar1977 7 121 أمس, 02:57 PM
آخر رد: أبووسم
  هل من الممكن العمل على قاعدة بيانات اكسل على الفيجوال بيسك خالد كامل1 4 83 24-03-24, 02:00 AM
آخر رد: خالد كامل1
  تعديل كود ارسال صورة الى الواتس new_programer 2 114 21-03-24, 10:07 PM
آخر رد: new_programer
  [سؤال] أتمنى اجابة وافية:عمل برنامج بقاعدة بيانات SQL دون حاجة تثبيت SQLSERVER dr.programming 6 600 19-03-24, 08:56 AM
آخر رد: سلامه محمد11
  استعلام select عن مجموعة بيانات Adel27213 1 172 15-03-24, 01:11 AM
آخر رد: justforit
  [سؤال] مشكلة اتصال مفتوح dell 2 150 12-03-24, 09:46 PM
آخر رد: dell
  تعديل بيانات عمود DataGridView دفعة واحدة مصمم هاوي 2 164 05-03-24, 08:27 PM
آخر رد: مصمم هاوي
  [VB.NET] تحديث بيانات فى كلاس من جدول سيكوال asdfar1977 6 184 26-02-24, 01:07 AM
آخر رد: asdfar1977
  كيفية جمع أرقام عمود فى الداتا جريد فيو بناءاً على بيانات معينة heem1986 5 223 25-02-24, 11:26 PM
آخر رد: heem1986
  [C#.NET] طباعة بيانات داتا جرد فيو h2551996 0 84 25-02-24, 02:31 PM
آخر رد: h2551996

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم