在Delphi中,定位文件的操作主要有两种方法。一种是直接定位文件,即通过“打开”对话框(OpenDialog)控件来实现。另一种是只定位到文件夹,然后再在此文件夹内寻找文件,这种定位方法是利用Delphi提供的SelectDirectory函数。这个函数是在FileCtrl单元中定义的,因此在使用时不要忘记在Uses中加入单元名。
下面就以一个例子来说明这两种方法在Delphi中的具体实现:
首先建立一个新的工程,然后在窗体上加入两个按钮控件、一个“打开”对话框,再加入两个标签控件作为两种实现结果的存储控件。
各个控件的主要属性设置如下:
Button1中:
Caption='直接定位文件'
Button2中:
Caption='定位到文件夹'
OpenDialog1中:
Filter= '所有文件(*.*)(北联网教程,专业提供视频软件下载)
……