void __fastcall TForm1::Button1Click(TObject *Sender) { OpenDialog1->Title = "Delete File"; if (OpenDialog1->Execute()) //是否选择了文件 { //判断文件是否存在 if (FileExists(OpenDialog1->FileName)) { //询问是否要删除这个文件 if (MessageDlg( ("Do you really want to delete " + ExtractFileName(OpenDialog1->FileName) + "?"), mtConfirmation, TMsgDlgButtons() << mbYes << mbNo, 0, mbNo) == mrYes) DeleteFile(OpenDialog1->FileName); //删除文件 } else //否则不存在该文件 MessageDlg(("File " + ExtractFileName(OpenDialog1->FileName) + " does not exist."), mtConfirmation, TMsgDlgButtons() << mbOK, 0); } }
C++ builder XE 如何删除文件的源码
最新推荐文章于 2021-11-14 17:01:07 发布