title: FtpOpenFile returns nil instead of file handle when uploading
body: <p>I'm transferring a file using ftp in Delphi.</p>
  
  <p>I am able to connect to the ftp account ok but when I try and upload a file the 
  FtpOpenFile function returns nil instead of a handle the file to be uploaded.</p>
  
  <pre><code>hintfile := FtpOpenFile(hintconnect,PChar(tgtfn),GENERIC_WRITE,FTP_TRANSFER_TYPE_BINARY,0);
  </code></pre>
  
  <p>If I log into the ftp site using an ftp client application and exactly the same credentials I can upload the file without a problem.</p>
  
  <p>Any suggestions appreciated.</p>