Código Delphi [-]DataFile := TPath.Combine(TPath.GetSharedDocumentsPath, 'NombreDelFichero.Extensión');
DataFile := TPath.Combine(TPath.GetSharedDocumentsPath, 'NombreDelFichero.Extensión');