急!急!急!急!急! FindFirstFile(....);while(FindNextFile(....)){ .... DeleteFile(File); ....} 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 BCB下可以这样用: WIN32_FIND_DATA find_data; AnsiString TempFiles; TempFiles="C:\\temp\\*.*"; find_data.dwFileAttributes =FILE_ATTRIBUTE_TEMPORARY; HANDLE hfindResult; AnsiString DelFile("C:\\temp\\"); hfindResult=FindFirstFile(TempFiles.c_str(),&find_data); if(hfindResult!=INVALID_HANDLE_VALUE) { DelFile+=find_data.cFileName; DeleteFile(DelFile); while(FindNextFile(hfindResult,&find_data)!=0) { AnsiString F="C:\\Temp\\"+find_data.cFileName; DeleteFile(F.c_str()); } } 1。直接调用外部过程deltree;2。编写递归过程,如果目录中有目录,递归调用! TWebBrowser的问题 mousemove事件 DELPHI 查询 delphi 获取较系统时间并和指定的字符串时间进行比较,当指定时间小于等于系统时间时弹出提示框。 求助:在主窗体中打开子窗体的方法 制作软件注册页面时出现的问题! 一个DBComboBox和Items的问题 100分送上! 请问一下,可以教教我吗? 新人“ gxlxwp1982(我爱Delphi,就像老鼠爱大米)”来了,以后大家多帮忙!!!!1 进销存管理系统源代码(delphi5 + SQLServer7/2000) Delphi3.0下Quikrep中的打印 请lsx78来接受wai_lf的馈赠
WIN32_FIND_DATA find_data;
AnsiString TempFiles;
TempFiles="C:\\temp\\*.*";
find_data.dwFileAttributes =FILE_ATTRIBUTE_TEMPORARY;
HANDLE hfindResult;
AnsiString DelFile("C:\\temp\\");
hfindResult=FindFirstFile(TempFiles.c_str(),&find_data);
if(hfindResult!=INVALID_HANDLE_VALUE)
{
DelFile+=find_data.cFileName;
DeleteFile(DelFile);
while(FindNextFile(hfindResult,&find_data)!=0)
{
AnsiString F="C:\\Temp\\"+find_data.cFileName;
DeleteFile(F.c_str());
}
}
2。编写递归过程,如果目录中有目录,递归调用!