|
먼저 답변 감사드립니다..
제가 temp 폴더를 만들지 않아서 생긴 에러더군요...
그런데 이번에는 삭제하는데 문제가 생겼어요.....
d __fastcall TFrm_Main::Mnu_DeleteCardClick(TObject *Sender)
{
if(DataModule2->Query1->FieldByName("Id")->AsString == "") return;
if(MessageDlg("확실합니까?", mtConfirmation, TMsgDlgButtons()<<mbOK<<mbCancel, 0) == mrOk) {
DataModule2->Master->Open();
DataModule2->Detail->Open();
DataModule2->Master->Delete();
DataModule2->Detail->Delete();
Path = "c:\\Temp\\"+ DataModule2->Master->FieldByName("Id")->AsString;
DeleteFile(Path);
DataModule2->Query1->Close();
DataModule2->Query1->Open();
DataModule2->Master->Close();
DataModule2->Detail->Close();
}
이렇게해서 만들어진 파일을 지우려고 하는데 (이것도 책에나온 예제입니다) 안지워 지는군요..
하~~~~.. 왜 또 안되는지...
또다시 답변 부탁 드립니다...
|