المشاركات : 26
المواضيع 4
الإنتساب : Feb 2013
السمعة :
0
الشكر: 0
تم شكره 0 مرات في 0 مشاركات
السلام عليكم
جزاكم الله خير ابي كود يحفظ الي بداخل مربع النص بعد عمل exe للبرنامج
دون مرفقات بحيث اذا شغلت البرنامج في جهاز ثاني اجد داخل المربع اخر شي حفظته
ولكم خالص الشكر وتقدير
المشاركات : 3
المواضيع 0
الإنتساب : Oct 2013
السمعة :
0
الشكر: 8
تم شكره 0 مرات في 0 مشاركات
Private Sub Form_Load()
' الكود فى الفورم
Text1.Text = GetSetting(App.EXEName, "textboxes", "text1", "")
Text2.Text = GetSetting(App.EXEName, "textboxes", "text2", "")
End Sub
Private Sub Form_Unload(Cancel As Integer)
' الحفظ عند الإغلاق
SaveSetting App.EXEName, "textboxes", "text1", Text1.Text
SaveSetting App.EXEName, "textboxes", "text2", Text2.Text
End Sub
المشاركات : 26
المواضيع 4
الإنتساب : Feb 2013
السمعة :
0
الشكر: 0
تم شكره 0 مرات في 0 مشاركات
الله يجزاك الجنه المثال ممتاز بس لما نقلت البرنامج الى جهاز اخر بعد عمل exe تكون مربعات النص فارغه
المطلوب ان تبقى على اخر حفظ
المشاركات : 513
المواضيع 2
الإنتساب : Sep 2013
السمعة :
16
الشكر: 245
تم شكره 445 مرات في 172 مشاركات
السلام عليكم
- جرب هذا المثال .
- تحياتي .
الملفات المرفقة
SaveTextboxData.rar (الحجم : 2.17 ك ب / التحميلات : 81)
المشاركات : 26
المواضيع 4
الإنتساب : Feb 2013
السمعة :
0
الشكر: 0
تم شكره 0 مرات في 0 مشاركات
VB_Coder
هذا هو المطلوب والله يجزاكم الجنه
تسلم يالغالي
المشاركات : 513
المواضيع 2
الإنتساب : Sep 2013
السمعة :
16
الشكر: 245
تم شكره 445 مرات في 172 مشاركات
السلام عليكم
- أهلا بك أخي العزيز ، شكرا لك .
- تحياتي .