掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
IOエラー145とは？ (ID：32314)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
nobukoshi802さん どうやらそれが原因として突き止めました。最初はFindFirst〜FindNextでファイルが存在しないことを確認してからrmDIrしていたのですが、これだと前記のような現象が発生します。そこで、SHellAPIのSHFileOperationを使ってみたところ、期待したとおりの動作を得ることができました。 var foStruct: TSHFileOpStruct; res : integer; begin with foStruct do begin wnd := Handle; wFunc := FO_DELETE; pFrom := PChar('フォルダ名' + #0); pTo := nil); fFlags := fof_NOCONFIRMATION or FOF_NOCONFIRMMKDIR; fAnyOperationsAborted := False; hNameMappings := nil; lpszProgressTitle := nil; end; Res := SHFileOperation(foStruct); これでいけました。ありがとうございました。
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.