程序启动如何检测文件夹是否存在?(20分)

  • 主题发起人 主题发起人 qq172
  • 开始时间 开始时间
Q

qq172

Unregistered / Unconfirmed
GUEST, unregistred user!
我想在程序启动时让程序检测在D盘上是否存在ABC文件夹,如果有责启动程序,如果没有则提示,点击确定后创建该文件夹,该怎么做呢?
 
if not DirectoryExists('d:/abc') then
if Application.MessageBox('目录不存在,是否需要创建?','提示',MB_ICONINFORMATION+MB_YESNO)=IDYES then
CreateDir('d:/abc');
 
mainform.oncreate(...);
if not directoryexists('D:/ABC') then
begin
showmessage('文件夹不存在');
createdir('D:/ABC');
end;
 
DirectoryExists
 
多人接受答案了。
 
后退
顶部