I have written a simple program to upload some files from my PC to our FTP site. Basically once a new build of our software is complete, the program kicks in to upload the files. However about 75% of the time, the upload stalls after 8760 bytes.
As far as I can see (from Google) this is a magic number with TCP/IP under windows. If I try and upload the same files to the same location using a commercial FTP program, then it never seems to have a problem, so I'm assuming that it either doesn't stall or internally copes with the stall without reporting it to me. Any suggestions ? These are the properties of the component and below is the simple code I'm using to operate it. Delphi 5, FTPClient seems to be Version: 2.86 object FtpClient1: TFtpClient Timeout = 60 MultiThreaded = False HostName = 'ftp.navigator.co.uk' Port = 'ftp' LocalAddr = '0.0.0.0' UserName = XXXX <-removed from posting PassWord = XXXX <-removed from posting HostDirName = '/' DisplayFileFlag = True Binary = False ShareMode = ftpShareCompat Options = [ftpAcceptLF] ConnectionType = ftpDirect OnCommand = FtpClient1Command OnProgress = FtpClient1Progress OnSessionConnected = FtpClient1SessionConnected OnSessionClosed = FtpClient1SessionClosed OnRequestDone = FtpClient1RequestDone OnBgException = FtpClient1BgException Left = 288 Top = 77 end FTPClient1.connect; FTPClient1.HostDirName := paramstr(1); FTPClient1.HostFileName := paramstr(3); FTPClient1.localfilename := paramstr(2); if FTPClient1.Cwd() then begin if not (FTPClient1.Binary) then begin FTPClient1.Binary := true; FTPClient1.TypeSet(); end; FTPClient1.dele; FTPClient1.put; All the FTPClient1 events write to a Tmemo to report the progress/status. regards David -- To unsubscribe or change your settings for TWSocket mailing list please goto http://www.elists.org/mailman/listinfo/twsocket Visit our website at http://www.overbyte.be