title: I cannot delete files to Recycle Bin
body: <p>I cannot delete files to Recycle Bin.</p>
  
  <pre><code>VAR SHFileOpStruct: TSHFileOpStruct;
  begin   
    with SHFileOpStruct  do
    begin
      wnd   := Handle; 
      wFunc := FO_DELETE;
      pFrom := PChar(FileName);
      fFlags:= 0;
      pTo   := NIL;
      hNameMappings:= NIL;
      lpszProgressTitle:= NIL;
    end;
    Result:= SHFileOperation(SHFileOpStruct); 
  end;
  </code></pre>
  
  <p>I can delete files in this format: '1.xyz' but not in this format '12.xyz' (file name is longer than 1 character).</p>