delphi中如何删除带空格的目录 用delphi做安装程序时生成了目录"C:\Documents and Settings\Administrator\「开始」菜单\程序\我的程序";在卸载时如何删除这个目录; 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 RemoveDirectory前提确保该目录为空. 用delphi做安装程序?是你用Delphi开发安装程序? DeleteDirectory(const Source:String): boolean;//删除某个目录var fo: TSHFILEOPSTRUCT;begintry FillChar(fo, SizeOf(fo), 0); with fo do begin Wnd := 0; wFunc := FO_DELETE; pFrom := PChar(source+#0); pTo := PChar(source+#0); fFlags := FOF_NOCONFIRMATION+FOF_NOCONFIRMMKDIR ; end; Result := (SHFileOperation(fo) = 0);finallyend;end; 如果欲删除的目录为空,直接用下面的方法即可删除:RemoveDir('C:\Documents and Settings\Administrator\「开始」菜单\程序\我的程序');我已在我的机器上测试通过。 不管带不带空格都是一样,首先得确定目录中不含有文件,如果有先进行删除文件才能删除目录.RemoveDir() 已经处理了,结贴.我就是用Delphi来做安装程序,在卸载时要删除这个目录. 外部程序调用 给treeview添加符合条件的结点??? Delphi7中为什么用dbexpress连不上 MS SQL Server 2000? scanline新闻 如和将256色(或者更高颜色)的bmp图片转换为16色?要求转换后颜色失真较少. Delphi速度的问题 请问大家,怎样使用jpg图像文件? 有关进度条的问题!!! 请问:当在执行中出现"table:dataset not in edit or insert mode"的提示信息后,如何解决? 关于两个DBF文件的关联 变量问题 如何让MDI窗体下的相同子窗体不重复开启
是你用Delphi开发安装程序?
//删除某个目录
var
fo: TSHFILEOPSTRUCT;
begin
try
FillChar(fo, SizeOf(fo), 0);
with fo do
begin
Wnd := 0;
wFunc := FO_DELETE;
pFrom := PChar(source+#0);
pTo := PChar(source+#0);
fFlags := FOF_NOCONFIRMATION+FOF_NOCONFIRMMKDIR ;
end;
Result := (SHFileOperation(fo) = 0);
finally
end;
end;