برای گرفتن لیست فایلها از کد جاوا استفاده میکنیم
✨ نکات مهم:
• کد آماده و تستشده (2 قطعهکد)
• کار با کتابخانههای: JavaObject، File
• کپی و استفاده مستقیم در پروژه B4A
📚 کتابخانههای مورد نیاز:
JavaObject، File
(از مسیر Libraries در محیط B4A تیک بزنید.)
🚀 نحوه استفاده:
کد زیر را کپی کنید و در Sub یا ماژول مناسب پروژه خود قرار دهید؛ کتابخانههای اعلامشده را تیک بزنید.
| دستهبندی | تکه کدها |
| تاریخ انتشار | ۲۷ شهریور ۱۴۰۵ - ۰۰:۲۹ |
| تعداد بازدید | ۲ |
| تعداد فروش | ۰ |
| فرمت تحویل | فایل دانلودی (بعد از پرداخت آنی فعال میشود) |
| پشتیبانی | تیکت پشتیبانی در پنل کاربری |
ویژگیهای کلیدی
- تکهکد آماده B4A
- کاملاً رایگان
- کد تستشده با توضیح فارسی
- کتابخانه: JavaObject، File
هنوز نظری ثبت نشده است. اولین نفر باشید!
برای ثبت نظر وارد شوید. (ثبت نظر پس از خرید فعال میشود)
#If java
import java.io.File;
import java.util.ArrayList;
import java.util.Arrays;
import java.util.Collections;
import java.util.Comparator;
import java.util.List;
public List getlistOfFiles(String dir) {
try {
File files = new File(dir);
List listOfFiles = Arrays.asList(files.listFiles());
Collections.sort(listOfFiles, new Comparator() {
@Override
public int compare(File f1, File f2) {
return (int) (f2.lastModified()-f1.lastModified());
}
});
List filestring=new ArrayList();
for (File file:listOfFiles){
filestring.add(file.getName());
}
return filestring;
}catch (Exception e){
return null;
}
}
#End If
Dim jo As JavaObject
Dim l As List=jo.InitializeContext.RunMethod("getlistOfFiles",Array As Object(File.DirDefaultExternal))
Try
For Each f As String In l
Log(f)
Next
Catch
Log(LastException)
End Try