Bueno, ya pude solucionar el tema de pasar el blob de la tabla al campo del objeto, de todos modos me sirvió lo anterior ya que había metido la pata con la inicialización del objeto.
Pongo el código que utilicé para cargar los datos de los campos del objeto con los de la tabla:
Código:
function TdmFiguras.Cargar(var FDatos : TDatos) : boolean;
var
Stream : TMemoryStream;
begin
Stream := TMemoryStream.Create;
FDatos.codigo:=dmTablas.Tabla.Fields.Fields[0].AsString;
FDatos.marca:=dmTablas.Tabla.Fields.Fields[1].AsString;
FDatos.rubro:=dmTablas.Tabla.Fields.Fields[2].AsString;
FDatos.producto:=dmTablas.Tabla.Fields.Fields[3].AsString;
Stream.LoadFromStream(dmTablas.Tabla.CreateBlobStream(dmTablas.Tabla.FieldByName('FIGURA'),bmRead));
FDatos.imagen:=Stream;
result := true;
end;
Muchas gracias.
Walter