[acertij022]

Gracias por leer mi duda pero encontre algo que me sirve lo publico por si a alguien le sirve.

procedure TForm1.Button1Click(Sender: TObject);
var
st1, st2: PChar;
begin
st1:='c:\OldDirectory';
st2:='c:\NewDirectory';
MoveFile(st1, st2);
end;