Title: Rename directoryUse MoveFile to rename existing directory.procedure TForm1.Button1Click(Sender: TObject);var st1, st2: PChar;begin st1:='c:\OldDirectory'; st2:='c:\NewDirectory'; MoveFile(st1, st2);end;