Buenas, Soy nuevo en el mundo de la programación en Delphi, quiero crear un reporte en Rave con una imagen que se incluye en una tabla virtual que luego se carga en el rave, en Delphi 7 me funciona bien, ahora estoy migrando el código a Delphi XE 10.2 Tokio y me da error al compilar el código para x64, debajo le dejo el método con el que copio la imagen a una variable Blob y luego la paso para a la tabla virtual del Rave.
Código Delphi
[-]
procedure EscribirImagen(Connection: TRvCustomConnection; ArchivoImagen: string);
var
Buffer: Pointer;
Stream: TFileStream;
begin
Stream := TFileStream.Create(ArchivoImagen, fmOpenRead);
try
Buffer := AllocMem(Stream.Size);
try
Stream.Read(Buffer^, Stream.Size);
Connection.WriteBlobData(Buffer^, Stream.Size);
finally
FreeMem(Buffer, Stream.Size);
end;
finally
Stream.Free;
end;
end;