Ok, llevo todo el día de ayer y hoy tratando de modificarlo.
obviamente ya vi las líneas 104 y 106, de hecho son asi
104: function Read(var Buffer; Count: Integer): Integer; override;
106: function Write(const Buffer; Count: Integer): Integer; override;
están en este type
Código Delphi
[-]type
TCryptStream = class(TStream)
private
protected
public
function Read(var Buffer; Count: Integer): Integer; override;
function Write(const Buffer; Count: Integer): Integer; override;
end;
si me voy a la clase TStream, me manda a un archivo llamado "System.Classes" y ahí esta esto:
TStream = class(TObject)
Y ahora si me voy a TObject, me manda a otro archivo llamado "System", en donde esta esto:
TObject = class
supongo que eso quiere decir que ahí es la clase base, y como es de esperarse la funcion Read y write no están definidas en TStream ni en TObject así que supongo que ahí esta el error, aquí el problema es que en los archivos llamados "System.Classes" y "System", están protegidos por consecuente, no me deja editarlos asi que vuelvo a lo mismo, no puedo definir estas funciones en la clase base.