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

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

عندما تقوم بفتح المفكرة المدمجة مع الويندوز وتفتح عن طريقها اي ملف وبعدها تقوم بإضافة اي نص على النص الموجود ثم تحاول فتح ملف جديد من القائمة الموجودة في اعلى المفكرة تظهر لك رسالة تخبرك" هل تريد حفظ التغيرات؟

ماذا اضع داخل هذا SUB
حتى يتعرف على اي تغيرات تحدث داخل TEXTBOX

كود :
Private Sub NewToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles NewToolStripMenuItem.Click

    End Sub
اثنان لا يتعلمان المتكبر والخجول
Heart اللهم علمنا ما ينفعنا و انفعنا بما علمتنا وَ زِدْنا علماً‏ Heart
الرد }}}}
تم الشكر بواسطة:
#2
(19-12-14, 05:16 AM)silverlord كتب : السلام عليكم ورحمة الله وبركاته

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

عندما تقوم بفتح المفكرة المدمجة مع الويندوز وتفتح عن طريقها اي ملف وبعدها تقوم بإضافة اي نص على النص الموجود ثم تحاول فتح ملف جديد من القائمة الموجودة في اعلى المفكرة  تظهر لك رسالة تخبرك" هل تريد حفظ التغيرات؟

ماذا اضع داخل هذا SUB
حتى يتعرف على اي تغيرات تحدث داخل TEXTBOX


كود :
   Private Sub NewToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles NewToolStripMenuItem.Click

   End Sub

ووضضح
لقد اكتشفت مع الأيام أنه ما من فعلٍ مغايرٍ للأخلاق, وما من جريمة بحق المجتمع إلا ولليهود والنصارى يداً فيها  Idea

الرد }}}}
تم الشكر بواسطة:
#3
سوف تضع كود في الاعلي بأي مكان فاضي

Public Change As Boolean = False

وتضغط عالتكست بوكس مرتين المكان الي الشخص رح يكتب فيه
وتجي عند حدث TextChange

وتكتب هكذا

Change = True

وطبعا في زر الحفظ رح تعمل جملة شرطية

يقارن Change لو Fasle او True
الرد }}}}
تم الشكر بواسطة: الوليد ☺ , silverlord
#4

السلام عليكم ورحمة الله

أبسط طريقة هو وضع متغير يدل أنه حدث تغيير وتقرأ قيمته عند فتح ملف أو الخروج.
مثل
PHP كود :
Dim modify As Boolean

' حدث التغيير في محتوي مربع النص '
Private Sub TextBox1_TextChanged(sender As ObjectAs EventArgsHandles TextBox1.TextChanged
    modify 
True
End Sub


' فتح ملف '
Private Sub Button1_Click(sender As ObjectAs EventArgsHandles Button1.Click

    
If modify Then

        Dim result 
As MsgBoxResult MsgBox("هل تريد حفظ التعديلات؟"MsgBoxStyle.YesNoCancel)

        
Select Case result

            
Case MsgBoxResult.Yes
                SaveFileDialog
() ' حفظ الملف '

            
Case MsgBoxResult.Cancel
                
Exit Sub ' التراجع عند فتح ملف وترك الوضع كما كان '

        
End Select

        OpenFileDialog
() ' فتح ملف '

    
Else
        
OpenFileDialog() ' فتح ملف '

    
End If

End Sub 

الرد }}}}
تم الشكر بواسطة: silverlord
#5
قبل ما اسوي المفكرة كنت عامل تحدي بيني وبين اني ماراح استعين بأي مصادر نهائيا وراح اعمل المفكرة بدون اخطاء ومثل الموجودة في الويندوز لكن للأسف وقفت عند هذي المرحلة كيف اخلي البرنامج يعرف اي تغيرات حدثت في textbox Smile
كنت اتوقع ان الموضوع بسيط مجرد عمل مقارنة بين Length وراح تضبط معاي لكن للأسف فشلت الطريقة

عموماً الله يعطيكم العافية اخواني على مساعدتي وشرفني مشاركتكم جميعاً

تحياتي لكم
اثنان لا يتعلمان المتكبر والخجول
Heart اللهم علمنا ما ينفعنا و انفعنا بما علمتنا وَ زِدْنا علماً‏ Heart
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  قاعدة البيانات لا تدعم اللغة العربية ؟؟؟؟؟؟ صبري زينوبي 11 154 01-12-16, 12:55 PM
آخر رد: صبري زينوبي
  تغيير قاعدة البيانات من اكسس الى sql hglogtd 2 94 26-11-16, 03:03 AM
آخر رد: hglogtd
  [سؤال] ايهما افضل من جهة امن البيانات thevirus 2 83 24-11-16, 12:14 PM
آخر رد: thevirus
  [كود] الحذف من قاعدة البيانات بواسطة كلمة سر المبرمج العبقري 5 117 23-11-16, 05:21 PM
آخر رد: hglogtd
  [VB.NET] الاتصال بقاعدة البيانات في التقارير (الكريستال ريبورت) thevirus 2 79 23-11-16, 11:05 AM
آخر رد: thevirus
  مساعدة في عرض البيانات في التقرير haiderkh 1 70 21-11-16, 11:24 PM
آخر رد: السرور
  طلب كود لحذف جميع البيانات من الجدول haiderkh 4 112 21-11-16, 07:11 PM
آخر رد: haiderkh
  اضافه خليه في قاعدة البيانات بعد ربطها بVB2010 أحمد العرب 1 52 20-11-16, 10:56 PM
آخر رد: ابراهيم النعيمي
  مسار قاعدة البيانات في التكست بوكس hglogtd 2 70 19-11-16, 02:19 AM
آخر رد: hglogtd
  الحذف من قاعدة البيانات بدلات تشيك بوكس في داتا جريدفيو makky 1 69 17-11-16, 10:50 PM
آخر رد: السرور

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


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