Internet Direct (Indy) Version 9.0.1 Beta
Example 1
  if Intercept.SendHandling then
  begin
    nByteCount := Intercept.Send(ABuffer^, StrLen(ABuffer));
  end
  else
  begin
    DefaultSend;
  end;