wenn ich hier die Verschlüsselungen abschalte, dann läuft es,
Delphi-Quellcode:
function TRCStreamDecorator.Read(var Buffer; Count: Integer): Integer;
begin
result := FStream.Read(Buffer, count);
// case EncodeMode of
// emEncodeWriting: Decode(Buffer, Buffer, Result); // abstrakter aufruf
// emEncodeReading: Encode(Buffer, Buffer, Result); // abstrakter aufruf
// end;
end;
function TRCStreamDecorator.Write(const Buffer; Count: Integer): Integer;
var
temp:pointer;
begin
GetMem(temp, count);
// case EncodeMode of
// emEncodeWriting: Encode(Buffer, temp^, Count); // abstrakter aufruf
// emEncodeReading: Decode(Buffer, temp^, Count); // abstrakter aufruf
// end;
result := FStream.Write(Buffer{temp^}, count);
FreeMem(temp, count);
end;
aber wenn sie aktiv sind, dann wirft mir ReadSalt eine
Exception zu, daß der gelesene SALT nicht mit dem Errechneten übereinstimmt.
und das sowohl vor, als auch noch nach meinen
Unicode-Änderungen.