> Just out of curiosity; who ever uses "i" in any other context than a loop
> index?
In fact it's L (lowercase). :-)
Lukas, here is the patch. I just added l := 0;
The line is useless, but it makes compiler happy.
@@ -1995,6 +1995,7 @@ procedure TBlockSocket.InternalSendStream(const
Stream: TStream; WithSize, Indy:
{$ENDIF}
begin
b := true;
+ l := 0;
if WithSize then
begin
l := Stream.Size - Stream.Position;;
------------------------------------------------------------------------------
Let Crystal Reports handle the reporting - Free Crystal Reports 2008 30-Day
trial. Simplify your report design, integration and deployment - and focus on
what you do best, core application coding. Discover what's new with
Crystal Reports now. http://p.sf.net/sfu/bobj-july
_______________________________________________
synalist-public mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/synalist-public
