title: How correct show the Explorer-based right-click menu
body: <p>I create this menu using code placed by Sertac Akyuz in answer here:
  <a href="https://stackoverflow.com/questions/5282021/show-the-default-right-click-menu-delphi">Show the default right-click menu - Delphi</a>
   and it works good, but there is problem:
  When I click in created menu: delete (delete file to recycled) - it asks me: <code>Are you sure want to delete?</code></p>
  
  <p>When i click Yes - it works ok, but when I click no - it shows me an error,
  I see in debugger, error is on line: </p>
  
  <pre><code>OleCheck(ContextMenu.InvokeCommand(CommandInfo));
  
  Error: ###(gdb unparsed remainder:s 0x0 out of bounds&gt;)###.
  </code></pre>
  
  <p>I use Lazarus, but i think, that in Delphi it is actual too.</p>
  
  <p>It seems to me, that the menu (windows) try to return to my program the answer - No, and in this situation error occurs.</p>
  
  <p>How to solve this problem? How correct solve this situation with answer 'No'?</p>