关于DeleteFile函数的问题?急（在线等待）

Question

DeleteFile函数为什么不能删除软盘上的文件呢？
如果不用这个函数用什么办法呢？

Answer 1

不行？deletefile('a:\aaa.bat')//磁盘写保护打开

Answer 2

function TFDataExport.DelDiskAFiles: Boolean;
Var
    FileList:TFileListBox;
    FileCount:integer;
begin
    try
      FileList:=TFileListBox.Create(nil);
      FileList.Width:=0;
      FileList.Height:=0;
      FileList.Parent:=FDataExport.Panel1.Parent;
      FileList.Hide;
      FileList.Mask:='A:\*.*';      For FileCount:=0 to FileList.Items.Count-1 do
        if DeleteFileA(PChar(FileList.Items.Strings[FileCount])) then  //？？？？
            showmessage('ok')
        else
            ShowMessage('error');     
      Result:=True;
    except
      FileList.Free;
      Result:=False;
    end;end;

Answer 3

filelistbox中的文件名没有路径，自己加上

Answer 4

if DeleteFileA(PChar(FileList.Directory+FileList.Items.Strings[FileCount])) then

Answer 5

应该再加个杠，
if DeleteFileA(PChar(FileList.Directory+'\'+FileList.Items.Strings[FileCount])) then