SAS中文论坛

标题: 如何通过对话框返回用户选择的文件夹？ [打印本页]

作者: shiyiming 时间: 2003-10-25 11:02
标题: 如何通过对话框返回用户选择的文件夹？
SCL中，提供了很多对话框用来返回用户选择的各类文件，如数据集、目录项（catalog entry）、SAS库等。但找来找去，却未找到能够返回用户选择文件夹（windows环境下的路径，就像windows下安装各种软件时用户可选择安装路径的功能）的对话框，我该如何实现此功能？

请各位多多指点，谢谢！

作者: shiyiming 时间: 2003-10-25 21:34
我估计的确是没有的，君不见用界面定义library和SAS系统右下角状态栏中的Change Current Folder都是用filedialog来实现的。
你的需求完全可以和SAS系统本身一样用rc=filedialog('AGGREGATE', ...... );来实现。
Pushbutton1:
charDelimiter='\';
charTmp=Textentry1.Text;
numTmp=indexc(charTmp,charDelimiter);
charFilename=scan(charTmp,numTmp+1,charDelimiter);
charDirectory=tranwrd(charTmp,charFilename,'');
rc=filedialog('AGGREGATE', charOpenFilename, charFilename, charDirectory, '*.*');
if rc=0 then Textentry1.Text=charOpenFilename;
return;

作者: shiyiming 时间: 2003-10-25 22:30
多谢shiyiming兄的指点。该方法虽然不如windows下安装软件时的那般好用，但也完全满足了我的要求，解决了我的问题。

谢谢！

欢迎光临 SAS中文论坛 (http://mysas.net/forum/)