Hello,
i've checked the compileroptions, but the options are for me the same
(D5 <-> D7).
After change the wsocket.pas it works ...... :-)
i don't know, what is was.........
thanks
richard
bAllSent : Boolean;
{$IFDEF COMPILER4_UP}
FReadCount : Int64;
{$ELSE}
FReadCount : LongInt;
{$ENDIF}
FPaused : Boolean;
And ~ Line 988:
property AllSent : Boolean read bAllSent;
{$IFDEF COMPILER4_UP}
property ReadCount : Int64 read FReadCount;
{$ELSE}
property ReadCount : LongInt read FReadCount;
{$ENDIF}
property RcvdCount : LongInt read GetRcvdCount;
Arno Garrels wrote:
> > Delphi wrote:
>
>> >> Hello Arno Garrels
>> >>
>> >> i get the exception EIntOverflow
>>
>>> >>> in Line 3842 in ..\vcl32\wsocket.pas
>>>
> >
> > If it is this line "FReadCount := FReadCount + Result;" it's
> > clear. FReadCount is just an integer. Instead it should be
> > defined as Int64 in newer compilers.
> > If CBuilder 4 supports Int64 (D4 supports it for sure) it could
> > be changed in WSocket.pas line 786 like this:
> >
> > bAllSent : Boolean;
> > {$IFDEF COMPILER4_UP}
> > FReadCount : Int64;
> > {$ELSE}
> > FReadCount : LongInt;
> > {$END}
> > FPaused : Boolean;
> >
> > And ~ Line 988:
> >
> > property AllSent : Boolean read bAllSent;
> > {$IFDEF COMPILER4_UP}
> > property ReadCount : Int64 read FReadCount;
> > {$ELSE}
> > property ReadCount : LongInt read FReadCount;
> > {$END}
> > property RcvdCount : LongInt read
> > GetRcvdCount;
> >
> > Please try these UNTESTED! changes and post the result, I'm currently
> > not sure whether further changes are required.
> > Compile your project by Option "Build All" once after the changes.
> >
> > ---
> > Arno Garrels [TeamICS]
> > http://www.overbyte.be/eng/overbyte/teamics.html
> >
> >
> >
>
>> >> Richard
>> >>
>> >>
>> >>
>> >> Arno Garrels wrote::
>>
>>> >>> Richard (Delphi) wrote:
>>> >>>
>>> >>>
>>>
>>>> >>>> After 2GB the client hang (overflow integer)
>>>> >>>> why doesn't work the in64-version of the functions in
>>>> >>>> D7 ?
>>>> >>>>
>>>>
>>> >>>
>>> >>> Please post the line number where the exception is being
>>> >>> raised. If you don't run the application in the IDE you can
>>> >>> compile a debug-version using MadExcept
>>> >>> http://www.madshi.net/madExceptDescription.htm
>>> >>>
>>> >>> ---
>>> >>> Arno Garrels [TeamICS]
>>> >>> http://www.overbyte.be/eng/overbyte/teamics.html
>>> >>>
>>> >>>
>>> >>>
>>>
>> >> exception EIntOverflow
>> >>
>>
>>> >>> in Line 3842 in ..\vcl32\wsocket.pas
>>>
-- To unsubscribe or change your settings for TWSocket mailing list
please goto http://www.elists.org/mailman/listinfo/twsocket
Francois PIETTE schrieb:
> As Angus said, it is probably a matter of compiler option generating code to
> detect - or not - the overflow. Check the settings for your D5 and D6.
>
> --
> Contribute to the SSL Effort. Visit http://www.overbyte.be/eng/ssl.html
> --
> [EMAIL PROTECTED]
> http://www.overbyte.be
>
>
> ----- Original Message -----
> From: "Richard (Delphi)" <[EMAIL PROTECTED]>
> To: "ICS support mailing" <[email protected]>
> Sent: Tuesday, May 30, 2006 6:33 PM
> Subject: Re: [twsocket] FTPClient problem w. large files in D7
>
>
>
>> in delphi 5 it works fine, but in delphi 7 i get the
>> error. is this ´not the same code? (stream.pas)??
>> richard
>>
>> "Angus Robertson - Magenta Systems Ltd" <[EMAIL PROTECTED]> schrieb:
>>
>>
>>>>> Very strange that error never came up when I added 64-bit support
>>>>> to the FTP client 6 month ago, I know I successfully tested DVD
>>>>> image files larger than 2 gigs.
>>>>>
>>>> Is it possible that you tested the upload only?
>>>>
>>> I would have testing both upload and download, but I was also testing
>>> resumed transfers as well, and deliberately interrupted some tests (by
>>> pulling the LAN cable) to ensure resume worked, that might have reduced
>>> some actual sessions below 2 gig.
>>>
>>> I might also have had the compiler ignore overflow set, since FReadCount
>>> is not really used.
>>>
>>> Angus
>>>
>>
>>
>> --
>> 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
>>
>
>
--
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
