A simple vista veo que tienes algunas lineas de códigos que estan por demás y cómo siempre es bueno destruir(liberar lo que se crea), que quisas sean las causantes del error.
Prueba hacerlo de ésta manera:
Código Delphi
[-]procedure GrabarTexto(varIDTexto:Integer; varStream:TStream);
var cmdActDatos:TADOQuery;
begin
cmdActDatos:=TADOQuery.Create(nil);
try
cmdActDatos.Connection :=cnn;
cmdActDatos.SQL.Add('insert into tabmaetextos (nroRs, descripBreve, pltTexto) Values (:nroRs, :descripBreve, :ltTexto)');
cmdActDatos.Parameters.ParamByName('nroRs').Value := varIDTexto;
cmdActDatos.Parameters.ParamByName('descripBreve').Value := 'Probando textos';
cmdActDatos.Parameters.ParamByName('pltTexto').LoadFromStream(varStream, ftBlob);
cmdActDatos.ExecSQL;
finally
cmdActDatos.Free; end;
end;
.
Saludos...

__________________
"Pedid, y se os dará; buscad, y hallaréis; llamad, y se os abrirá." Mt.7:7