Страница 18 из 127
Удаление файла (Вариант 1)
// Для удаления файла надо подключить к проекту Sysutils.hpp и напишите следующий код:
void __fastcall TForm1::Button1Click(TObject *Sender)
{
AnsiString FileName="c:\\readme.txt";
if (DeleteFile(FileName)) Label1->Caption="true";
}