TSymmetricAlgorithmBase.AddPadding(TBuffer,Integer,Integer) Method

protected
 procedure AddPadding(var buffer: TBuffer; startIndex: Integer; count: Integer);