Ĺadny brzuch
Jak sprawdzić czy plik o danej ścierzce dostepu istnieje?? Jak go usunąć??
Hej!
Dajesz uses ShellApi i wywalasz DeleteFile("scieżka_do_pliku") jak zwróci true to znaczy że istnieje (przy okjazji go usunie ;) Ja wywołuje CreateFile i sprawdzam czy uchwyt do pliku nie zawiera czasem flagi błędu, np. INVALID_HANDLE_VALUE...jeśli zawiera to prawdopodobnie nie istnieje, albo korzysta z niego inny program i nici z usuwania...
pozdrawiam
if fileexists('pliczek') then
costam;
DeleteFile('pliczek');
O ile pamietam, to DeleteFile jest z WinApi (czyli w Windows a nie ShellApi)
Deletes a file from disk.
Unit
SysUtils
Category
file management routines
Delphi syntax:
function DeleteFile(const FileName: string): Boolean;
C++ syntax:
extern PACKAGE bool __fastcall DeleteFile(const AnsiString FileName);
Description
DeleteFile deletes the file named by FileName from the disk. If the file cannot be deleted or does not exist, the function returns false.
Wystarczyło w Delphi otworzyć pomoc i w zakładce indeks wpisać DeleteFile :D
if FileExists(FileName) then  if MessageDlg('Do you really want to delete ' + ExtractFileName(FileName) + '?'), mtConfirmation, [mbYes, mbNo], 0, mbNo) = IDYes then   DeleteFile(FileName);
Użytkownik jancu edytował ten post 09 kwiecień 2005, 15:55
Tak jest - FileExists jest z sysutils - a deletefile z windows :)
zanotowane.pl doc.pisz.pl pdf.pisz.pl zsf.htw.pl
Hej!
Dajesz uses ShellApi i wywalasz DeleteFile("scieżka_do_pliku") jak zwróci true to znaczy że istnieje (przy okjazji go usunie ;) Ja wywołuje CreateFile i sprawdzam czy uchwyt do pliku nie zawiera czasem flagi błędu, np. INVALID_HANDLE_VALUE...jeśli zawiera to prawdopodobnie nie istnieje, albo korzysta z niego inny program i nici z usuwania...
pozdrawiam
if fileexists('pliczek') then
costam;
DeleteFile('pliczek');
O ile pamietam, to DeleteFile jest z WinApi (czyli w Windows a nie ShellApi)
Deletes a file from disk.
Unit
SysUtils
Category
file management routines
Delphi syntax:
function DeleteFile(const FileName: string): Boolean;
C++ syntax:
extern PACKAGE bool __fastcall DeleteFile(const AnsiString FileName);
Description
DeleteFile deletes the file named by FileName from the disk. If the file cannot be deleted or does not exist, the function returns false.
Wystarczyło w Delphi otworzyć pomoc i w zakładce indeks wpisać DeleteFile :D
if FileExists(FileName) then  if MessageDlg('Do you really want to delete ' + ExtractFileName(FileName) + '?'), mtConfirmation, [mbYes, mbNo], 0, mbNo) = IDYes then   DeleteFile(FileName);
Użytkownik jancu edytował ten post 09 kwiecień 2005, 15:55

Tak jest - FileExists jest z sysutils - a deletefile z windows :)
