function Encode(ASrcStream: TStream; const ABytes: integer = MaxInt): string; virtual; abstract; overload;
EncodeString