小弟通过ShellBrowse组件中的JamFileList控件获得了我想要的txt文件 现在要最这些txt文件进行用以处理 该怎么实现?我的思路是 放一个ListBox控件 将选中的txt文件放到ListBox中 ListBox能识别出里面的东西是txt文件吗? ListBox怎么知道我点了哪个文件呢?

解决方案 »

  1.   

    小弟通过ShellBrowse组件中的JamFileList控件获得了我想要的txt文件   现在要最这些txt文件进行用以处理   该怎么实现?我的思路是   放一个ListBox控件   将选中的txt文件放到ListBox中   ListBox能识别出里面的东西是txt文件吗?   ListBox怎么知道我点了哪个文件呢?
    ------------------
    首先添加一个opendialog,可以利用opendialog.filename确定文件都后缀 str:=copy(opendialog,pos('.',opendialog.filename)+1,length(opendialog.filename))
    再次判断str是否为'txt'