Hi,
I am using Delphi 7 and indy 9.
In my thread, if I set a break point on the put command, the file is ftp'd
correctly. When I run the app without the break point, I get a readtimeout
exception : Stack is :
ntdll.dll
C:\WINDOWS\System32\mswsock.dll
C:\WINDOWS\system32\WS2_32.dll
TIdStackWindows.WSSelect($39FD9E0,nil,nil,-2)
TIdSocketHandle.Readable(-2)
TIdIOHandlerSocket.Readable(-2)
TIdTCPConnection.ReadFromStack(True,-2,True)
TIdTCPConnection.ReadLn(#$A,-1,16384)
TIdTCPConnection.ReadLnWait(2147483647)
TIdTCPConnection.GetInternalResponse
TIdTCPConnection.GetResponse((...))
TIdTCPConnection.SendCmd('PORT 127,0,0,1,6,249',(...))
TIdFTP.SendPort($391D7E0)
TIdFTP.InternalPut('STOR testFile2.dat-FS=11',$39FCD60,True)
TIdFTP.Put($39FCD60,'testFile2.dat-FS=11',False)
TimFTPThread.SendEnvelope
TimFTPThread.ThreadExecute($3CBD9E0,False)
TimExecuteMethodThread.DoExecute
TimThread.Execute
C:\StarTeam\Inspiration Matters\Inspired Signage\Bin\ComposerWin32.exe
ThreadProc($3CBD9E0)
ThreadWrapper($38FEE30)
C:\StarTeam\Inspiration Matters\Inspired Signage\Bin\ComposerWin32.exe
C:\StarTeam\Inspiration Matters\Inspired Signage\Bin\ComposerWin32.exe
C:\WINDOWS\system32\kernel32.dll
The onstatus events give : Start Transferring and then the read time out
occurs.
If I remove the break point and put a sleep(100) in before the put command,
it seems to work.
Why is this happening?
Sham.
