掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
SHFileOperation 確認メッセージが表示されない (ID:47947)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
はじめまして。 現在、SHFileOperationを使用してファイルの削除処理を行っています。 ある特定の端末のみ削除確認メッセージが表示されず 即削除されてしまう現象が発生しています。 該当端末 Windows8.1 (※8.1updateかどうかは不明) 開発環境 Delphi2007 ソースは次の通りです。 function AllowUndo(AHandle: Thandle; ATarget: string): Boolean; var foStruct: TSHFileOpStruct; begin with foStruct do begin wnd := AHandle; wFunc := FO_DELETE; pFrom := PChar(ATarget+#0); pTo := PChar(#0); fFlags := FOF_ALLOWUNDO; fAnyOperationsAborted := False; hNameMappings := nil; lpszProgressTitle := nil; end; Result := (SHFileOperation(foStruct) = 0); end; 通常は次のようなメッセージが表示されると思っているのですが ソースを含め何か勘違いをしているのでしょうか。 ■ローカルドライブのデータが対象の場合 「ごみ箱に移動しますか?」 ■ネットワークドライブ等が対象の場合 「完全に削除しますか?」 他の端末ではWindowsXP〜Windows10まで問題なく動作しているため 現象も再現できず何かヒントはないかと質問させていただきました。 よろしくお願い致します。
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.