App Inventor 2 文件查找与文件管理教程

当 按钮_读取.被点击
  调用 File1.读取文件("/sdcard/MyApp/data.txt")

当 File1.读取完成(文件名, 内容)
  标签_内容.文本 = 内容

当 按钮_保存.被点击
  调用 File1.保存文件(输入框_内容.文本, "/sdcard/MyApp/data.txt")

当 Screen1.初始化
  ' 手动维护可用文件列表
  设 文件列表 = [
    "data.txt",
    "config.json",
    "notes.md"
  ]
  设 ListPicker_文件.元素 = 文件列表

当 ListPicker_文件.选择完成(选中项)
  调用 File1.读取文件("/sdcard/MyApp/" & 选中项)

当 按钮_选择文件.被点击
  设 ActivityStarter1.动作 = "android.intent.action.GET_CONTENT"
  设 ActivityStarter1.数据URI = "file/*"
  设 ActivityStarter1.类型 = "*/*"
  调用 ActivityStarter1.启动活动()

当 ActivityStarter1.活动结果(结果, 数据)
  如果 结果 = "OK"
    设 文件URI = ActivityStarter1.结果URI
    标签_文件路径.文本 = 文件URI
    ' 通过URI读取文件（可能需要扩展）

当 按钮_浏览.被点击
  设 文件列表 = 调用 FileTools1.列出文件("/sdcard/MyApp/")
  设 ListView_文件.元素 = 文件列表

当 ListView_文件.选择完成(选中位置, 选中项)
  设 文件路径 = "/sdcard/MyApp/" & 选中项
  如果 调用 FileTools1.是否为目录(文件路径)
    ' 是目录，进入
    设 新列表 = 调用 FileTools1.列出文件(文件路径 & "/")
    设 ListView_文件.元素 = 新列表
    设 当前路径 = 文件路径 & "/"
  否则
    ' 是文件，读取
    调用 File1.读取文件(文件路径)

当 按钮_搜索.被点击
  设 关键词 = 输入框_搜索.文本
  设 所有文件 = 调用 FileTools1.列出文件("/sdcard/")
  设 匹配列表 = 创建空列表
  设 i = 1
  当 i ≤ 列表长度(所有文件)
    如果 列表第i项(所有文件) 包含 关键词
      设 匹配列表 = 添加列表项(匹配列表, 列表第i项(所有文件))
    设 i = i + 1
  设 ListView_搜索结果.元素 = 匹配列表

' 复制文件
调用 FileTools1.复制(源路径, 目标路径)

' 移动文件
调用 FileTools1.移动(源路径, 目标路径)

' 删除文件
调用 FileTools1.删除(文件路径)

' 重命名
调用 FileTools1.重命名(文件路径, 新名称)

' 获取文件大小
设 大小 = 调用 FileTools1.文件大小(文件路径)

设 当前路径 = "/sdcard/"
设 路径历史 = 创建空列表

当 Screen1.初始化
  调用 导航到("/sdcard/")

定义 导航到(路径)
  设 当前路径 = 路径
  标签_路径.文本 = 路径
  设 文件列表 = 调用 FileTools1.列出文件(路径)
  
  设 显示列表 = 创建空列表
  如果 路径 ≠ "/sdcard/"
    设 显示列表 = 添加列表项(显示列表, "⬆️ ..（返回上级）")
  
  设 i = 1
  当 i ≤ 列表长度(文件列表)
    设 名 = 列表第i项(文件列表)
    设 完整路径 = 路径 & 名
    如果 调用 FileTools1.是否为目录(完整路径)
      设 显示列表 = 添加列表项(显示列表, "📁 " & 名)
    否则
      设 显示列表 = 添加列表项(显示列表, "📄 " & 名)
    设 i = i + 1
  
  设 ListView_文件.元素 = 显示列表

当 ListView_文件.选择完成(位置, 选中项)
  如果 选中项 以 "⬆️" 开头
    ' 返回上级
    调用 导航到(上级路径(当前路径))
  否则 如果 选中项 以 "📁" 开头
    ' 进入目录
    设 目录名 = 替换文本(选中项, "📁 ", "")
    调用 导航到(当前路径 & 目录名 & "/")
  否则
    ' 选择文件
    设 文件名 = 替换文本(选中项, "📄 ", "")
    调用 打开文件(当前路径 & 文件名)

当 Screen1.初始化
  调用 请求权限("android.permission.READ_EXTERNAL_STORAGE")
  调用 请求权限("android.permission.WRITE_EXTERNAL_STORAGE")