Autor Téma: Zpracování Symlink, Junction . . .  (Přečteno 265 krát)

Offline karkojk

  • Nováček
  • *
  • Příspěvků: 22
  • Karma: 0
    • Verze Delphi: RAD Studio X5
Zpracování Symlink, Junction . . .
« kdy: 27-07-2021, 08:48:13 »
Dal jsem se do většího rovnání/třídění dat, abych něco dal od sebe a data se nezdvojovala.
Nikde jsem nenarazil na nějaká omezení/doporučení ohledně Symlink ap., tak jsem začal víc používat Junction.
Jen jsem ani možnost okopírování na jiný disk.
Napadlo mě to udělat v Delphi, načíst s možností úprav a uložení.
Nedělal jste to někdo, nikde jsem na to nenarazil a přes příkazový řádek
dir /al /s | findstr "<JUNCTION>"
 se větší množství nedá.
Díky za případné nasměrování.
Programování pro radost, prý to bystří mysl ;-)

Offline Radek Červinka

  • Administrátoři
  • Padawan
  • *****
  • Příspěvků: 2950
  • Karma: 108
    • Verze Delphi: D2007, DXE + 2 poslední
    • O Delphi v češtině
Re:Zpracování Symlink, Junction . . .
« Odpověď #1 kdy: 27-07-2021, 09:33:29 »
Neco je v JCL - JclNTFS.pas

treba

// Junction Points
function NtfsIsJunctionPoint(const Path: string): Boolean;
function NtfsCreateJunctionPoint(const Source, Destination: string): Boolean;
function NtfsDeleteJunctionPoint(const Source: string): Boolean;
function NtfsGetJunctionPointDestination(const Source: string; var Destination: string; RemovePathPrefix: Boolean = False): Boolean;

// Symbolic Links
function NtfsIsSymlink(const Path: string): Boolean;
function NtfsGetSymlinkDestination(const Source: string; var Destination: string; RemovePathPrefix: Boolean = False): Boolean;

function NtfsGetReparsePointDestination(const Source: string; var Destination: string; RemovePathPrefix: Boolean = False): Boolean;   
Embarcadero MVP - Czech republic

Offline karkojk

  • Nováček
  • *
  • Příspěvků: 22
  • Karma: 0
    • Verze Delphi: RAD Studio X5
Re:Zpracování Symlink, Junction . . .
« Odpověď #2 kdy: 27-07-2021, 10:03:40 »
Díky moc, včera jsem projížděl google a nic, kouknu na to, snad ty vaše „základy" zvládnu  ;D
Programování pro radost, prý to bystří mysl ;-)