728x90
uses Androidapi.Helpers, Androidapi.JNI.JavaTypes, Androidapi.JNIBridge;
// Androidapi.Helpers는 JStringToString 및 StringToJstring 쓰기위해서는 추가
// Androidapi.JNI.JavaTypes는 JFile 쓰기 위해
// Androidapi.JNIBridge는 TJavaObjectArray<JFile> 쓰기 위해
{예로 버튼1 클릭시 리스트뷰 목록에 파일이름 추가}
procedure TForm1.Button1Click(Sender: TObject);
var TmpFile : JFile;
TmpFileList: TJavaObjectArray<JFile>;
Begin
TmpFile := TJFile.JavaClass.init(StringToJstring('앱 폴더경로'));
TmpFileList := TmpFile.listFiles;
for var I : integer := 0 to TmpFileList.Length-1 do
ListView1.Items.Add.Text := ExtractFileName(JStringToString(TmpFileList.Items[i].toString));
end;
파일 명만 출력 하실분은
↓↓↓↓↓↓↓↓↓↓
ExtractFileName(JStringToString(TmpFileList.Items[i].toString));
파일경로 출력하실분은
↓↓↓↓↓↓↓↓↓↓
JStringToString(TmpFileList.Items[i].toString);
첨부된 파일은 내부 경로 가져올때 사용합니다
uses Androidapi.Helpers, DPF.Android.OS; // DPF.Android.OS에서는 TJEnvironmen 포함으로 들어가있는것입니다^^
procedure TForm1.Button1Click(Sender: TObject);
var TmpFile : JFile;
TmpFileList: TJavaObjectArray<JFile>;
Begin
var TmpStr: string := JStringToString(TJEnvironmen.JavaClass.getExternalStorageDirectory.getAbsolutePath)+'/Download';
TmpFile := TJFile.JavaClass.init(StringToJstring(TmpStr));
TmpFileList := TmpFile.listFiles;
for var I : integer := 0 to TmpFileList.Length-1 do
ListView1.Items.Add.Text := ExtractFileName(JStringToString(TmpFileList.Items[i].toString));
end;
728x90
'FireMonkey 예제 자료' 카테고리의 다른 글
FireMonkey 안드로이드 타 쓰레드 Toast 알림 사용하기(액티비티,서비스) 가능 (0) | 2022.04.01 |
---|---|
FireMonkey 안드로이드 화면 켜짐 유지 (0) | 2022.03.20 |
파이어몽키(firemonkey) 코드로 화면 (세로,가로)전환 (0) | 2022.03.14 |
파이어몽키 안드로이드 EUC-KR Encode 인코딩 (0) | 2022.01.18 |
안드로이드 DrawLine 깨짐 발생시 간단 해결방법 (0) | 2022.01.18 |
파이어몽키 java to pas 및 자바 시그니처 주소 참고용 (0) | 2022.01.18 |
FireMonkey java class patch and jar patch 패치 하기 (0) | 2022.01.14 |
java 최근에 실행된 앱 보기에서 앱 지울시 종료하기 (0) | 2022.01.09 |
댓글