Source position: blcksock.pas line 363
protected procedure TBlockSocket.DoStatus(
Reason: THookSocketReason;
const Value: string
);