On Tue, 26 Jul 2011 10:43:01 +0200, Felipe Monteiro de Carvalho wrote:
> On Tue, Jul 26, 2011 at 6:44 AM, Piotr Polok <top...@polok.pl> wrote:
>> HTT.Sock.OnStatus := callback.Status;
>> end;
>>
>> Above code gives me a message: "Variable required". What I'm doing
>> wrong?
>
> If you are using FPC it should probably be:
>
> HTT.Sock.OnStatus := @callback.Status;
There is a problem only with below line:
HTT.Sock.OnHeartbeat:=@HeartBeat;
The definition of this is:
procedure TForm1.HeartBeat(Sender: TObject);
var
lBlkSock: TBlockSocket;
lDownloaded: Integer;
begin
lBlkSock := TBlockSocket(Sender);
lDownloaded:= lBlkSock.RecvCounter;
Self.Caption := Format('%d', [lDownloaded]);
end;
--
best regards
Piotr Polok
------------------------------------------------------------------------------
Magic Quadrant for Content-Aware Data Loss Prevention
Research study explores the data loss prevention market. Includes in-depth
analysis on the changes within the DLP market, and the criteria used to
evaluate the strengths and weaknesses of these DLP solutions.
http://www.accelacomm.com/jaw/sfnl/114/51385063/
_______________________________________________
synalist-public mailing list
synalist-public@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/synalist-public
