Source position: syncipc.pp line 135
procedure WriteInt(
AStream: TStream;
AInteger: Integer;
IntegerSize: Byte = sizeof(Integer)
);