Converts an object stream from a text to a binary format.
procedure ObjectTextToBinary(
Input: TStream;
Output: TStream
);