کار با فایل متنی به سادهترین شکل: SaveNote متن «متن ذخیرهشده برنامه» را در فایل note.txt داخل حافظه خصوصی برنامه (File.DirInternal) مینویسد و LoadNote بعد از چک کردن وجود فایل با Exists، آن را داخل edtName برمیگرداند. اگر فایل نباشد بهجای خطا پیام مناسب نمایش داده میشود. File.DirInternal جایی است که فقط خود برنامه به آن دسترسی دارد و نیازی به مجوز حافظه ندارد؛ برای متن ساده و کمحجم عالی است ولی برای داده زیاد و ساختیافته دیتابیس بهتر جواب میدهد.
بدون نیاز به کتابخانه جانبی (فقط کتابخانههای داخلی B4A)
این قطعهکد بهصورت خودکار توسط «موتور مولد B4A» ساخته و قبل از انتشار از نظر تکرارینبودن بررسی شده است. برای دیدن تکهکدهای جدید، همین بخش را دنبال کنید؛ هر بازه زمانی یک کد کاربردی جدید اضافه میشود.
| دستهبندی | تکه کدها |
| تاریخ انتشار | ۲۵ شهریور ۱۴۰۵ - ۱۹:۰۱ |
| تعداد بازدید | ۰ |
| تعداد فروش | ۰ |
| فرمت تحویل | فایل دانلودی (بعد از پرداخت آنی فعال میشود) |
| پشتیبانی | تیکت پشتیبانی در پنل کاربری |
ویژگیهای کلیدی
- کد B4A آماده استفاده
- توضیح کامل فارسی
- کاملاً رایگان
- بدون کتابخانه جانبی
هنوز نظری ثبت نشده است. اولین نفر باشید!
برای ثبت نظر وارد شوید. (ثبت نظر پس از خرید فعال میشود)
Sub SaveNote
' ذخیره متن در فایل داخلی برنامه
File.WriteString(File.DirInternal, "note.txt", "متن ذخیرهشده برنامه")
End Sub
Sub LoadNote
If File.Exists(File.DirInternal, "note.txt") Then
edtName.Text = File.ReadString(File.DirInternal, "note.txt")
Else
ToastMessageShow("هنوز چیزی ذخیره نشده بود", False)
End If
End Sub