كود الحفظ في الفورم

سلام ...

أتمني ان أكون قد فهمت قصدك لكن عندي فكرة....

أضف adodca وغير خاصية الرؤية للاخفاء واكتب كود الحفظ التالي

adodc1.recordset.addnew

adodc1.recordset.update

إن شاء الله تنجح معك واتمني من الاعشضاء ذوي الخبرة الافادة في هذا الموضوع؟

شكرا...........

سأعطيك مثالاً بسيطاً، يمكنك تجريبه على غيره من الخصائص، وهو يقوم بحفظ مفتاح في الريجيستري عند غلق البرنامج، وإعادة القراءة منه عند فتحه:

Private Sub Form_Load()

	Me.WindowState = Val(GetSetting(App.Title, "Props", "WindowState"))

End Sub

Private Sub Form_Unload(Cancel As Integer)

	SaveSetting App.Title, "Props", "WindowState", Me.WindowState

End Sub

في برنامجك، جرب تكبير الفورم وإغلاقه، ثم فتحه من جديد، ستجد أنه قام ببدء البرنامج والفورم كبيرة.

يمكنك تجريب هذا على باقي الخصائص.

انظر الروابط التي تتحدث عن الدالتين SaveSetting و GetSetting:

SaveSetting

GetSetting

وفقك الله