如何时时获得文件名和目录名？（在线等待，急！）(50分)

在录象监控系统中自动生成文件名和目录，请问各位大侠怎么能通过web服务器或者FTP服务器，将视频文件让大家访问浏览，其中涉及到谁录的谁才能看的问题，就是说希望能将文件名及路径保存到数据库中

记录每一驱动器的当前目录？
　　var

CurentDirList: Array[0...25] of string[70];　

在DirectoryOutline的OnChange事件中：　

procedure TFMForm.DirectoryOutlineChange(Sender: TObject);

begin

CreateCaption;

FileList.clear;

FileList.Directory := DirectoryOutline.Directory;

FileList.Update;

CurrentDirList[DriveTabSet.TabIndex] := DirectoryOutline.Directory;

FileManager.DirectoryPanel.Caption := DirectoryOutline.Directory;

end;　　

查API吧