SHFileOperation的问题，还请各位高手赐教。
var
sh:TSHFileOpStruct;
begin
sh.Wnd:=Handle;
sh.pFrom:=PChar(edit1.Text);
//sh.pFrom:=PChar(edit1.Text+ '*.* ');
sh.pto:=PChar(edit2.Text);
sh.wFunc:=FO_MOVE;
sh.fFlags:=FOF_FILESONLY and FOF_SIMPLEPROGRESS;
sh.lpszProgressTitle:=Pchar( 'Move File ');
SHFileOperation(sh);
end;
有时候可以，不时候不可以，当不行的时候提醒下面的错误：
无法移动文件：无法读原文件或磁盘


[解决办法]
不可能吧,有两个原因会引起这个现象吧,一个目录不存在或目标路径不存在.其二是文件正使用吧.
[解决办法]
是不是FOF_FILESONLY的原因?
[解决办法]
jf