Cita:
Empezado por edgwin
Gracias por responder ...
Estoy conciente del uso del Unicode en Delphi 2010 es por eso que intente hacer un cambio ....
Código Delphi [-]
....
function StreamCRC32(const Stream: TStream; var CRC: Cardinal;
const InitCRC:boolean; const Progress: TProgress): Integer;
var Buffer: PChar; --->> AQUI LO CAMBIE POR PANSICHAR
Count: Integer;
Size: Integer;
TotalSize: Integer;
...
Pero no resulto.
Alguna idea?
|
Ese se me paso, pero ahi esta el tema seguro...
vi que hay mas PChar , cambialos todos por PAnsiChar en princiipio, pero analiza que estan haciendo, perdon pero estoy a las corridas ahora no puedo chequearlo..
Suerte!