Look at Indy's Ticks()
and GetTickDiff()
functions, for example:
uses
..., IdGlobal;
var
StartTicks: LongWord;
begin
...
StartTicks := Ticks;
TCPClient.IOHandler.ReadStream(clientResponse, size, False);
Elapsed := GetTickDiff(StartTicks, Ticks);
...
end;