文件操作问题：改名，删除，移动

Question

我需要三个函数实现对文件得改名，删除，移动请有得提供一下，谢谢要三个函数独立实现

Answer 1

改文件名需不需要完整路径？我得代码是：
procedure TAddForm1.ListView1Edited(Sender: TObject; Item: TListItem;
  var S: string);
var
  OldFileName,NewFileName:string;
begin
  OldFileName:=ShellTreeView1.Path+'\'+ZipList.GetCurFileName;
  NewFileName:=ShellTreeView1.Path+'\'+ListView1.Selected.Caption;
  RenameFile(OldFileName,NewFileName);
end;但是不能改名成功，没有任何反映，不知道这个函数怎么用，帮助也没写清楚麻烦告诉一下，或者给个例程[email protected]

Answer 2

发现问题了，原来是ListView1Edited事件后ListView1.Selected.Caption还是原来那个，所以文件名没有改变那么我应该把这段代码放到什么事件后面呢？？？？