pokexperto1,
Cita:
...Obtener ruta de archivo a partir de directorio superior...(DeleteFile)...
|
Revisa este código:
Código Delphi
[-]
procedure TForm1.Button1Click(Sender: TObject);
var
openDialog : TOpenDialog;
begin
openDialog := TOpenDialog.Create(self);
openDialog.InitialDir := GetCurrentDir;
openDialog.Options := [ofFileMustExist];
openDialog.Filter := 'Archivos a Borrar|*.*';
openDialog.FilterIndex := 1;
if openDialog.Execute then
DeleteFile(openDialog.FileName);
openDialog.Free;
end;
El código anterior en Delphi 7 sobre Windows 7 Professional x32,
permite borrar un archivo en un directorio cualquiera.
Revisa esta información:
Espero sea útil
Nelson.