Delphi – Preimenovanje fajlova i foldera

U ovom prilogu ćemo vam objasniti kako da preimenujete (premestite) postojeći folder ili fajl na vašem disku. Za ovu operaciju iskoristićemo Windows API funkciju „MoveFile()“. Preimenovanje ćemo prikazati na primeru, recimo da imamo folder „C:Moj folder“ i da želimo da ga preimenujemo u „C:Drugi folder“. Krajnje je jednostavno, samo pozovemo API funkciju MoveFile():

MoveFile(‘C:Moj folder’,

‘C:Drugi folder’);

Vrlo je slično i kada se radi o fajlovima, za primer preimenovaćemo fajl „word.txt“ u fajl „excel.txt“ u nekom folderu:

MoveFile(‘C:Moj folderword.txt’,

‘C:Moj folderexcel.txt’);

Evo i sintakse i definicije same API funkcije.

BOOL MoveFile(

    LPCTSTR lpExistingFileName,

    // naziv postojeceg fajla ili foldera

    LPCTSTR lpNewFileName

    // naziv novog fajla ili foldera

   );

Argumenti i parametri funkcije su:

• lpExistingFileName – predstavlja PChar string (string koji se završava nulom), naziv postojećeg fajla-foldera.
• lpNewFileName – predstavlja PChar string koji specifikuje novi naziv prethodnog fajla ili foldera. Novi nazivi ne smeju da već postoje, novi fajl može biti na različitom drajvu. Novi folder mora da bude na istom drajvu na kome se nalazi i prethodni folder (preimenovani).

Funkcija MoveFile() će premestiti (preimenovati) postojeći fajl ili folder uključujući sve podfoldere. Jedina mana ove funkcije je ta, što neće proći ako vršimo premeštanje (move) na neki drugi drajv na sistemu.

Pratite Krstaricu na www.krstarica.com