Guardar OleVariant en Blob de Intarbase

[mordaz]

Debido a un rayo de luz en mi camino me veo en la necesidad de responderme a mi mismo por si alguien necesita hacerlo después.
Encontré la manera de guardarlo directamente en la base de datos de esta manera:

Para guardar:

   OleVariant Ovt;
   Muestra.Serialize(Ovt);   //donde obtiene su valor Ovt
   Variant Vrt=reinterpret_cast<Variant&>(Ovt);

   IBTblHuellas->Edit();
   IBTblHuellas->FieldByName("Huella")->AsVariant=Vrt;
   IBTblHuellas->Post();

Para recuperar:

   OleVariant Ovt;
   IBQryAdmin->SQL->Clear();
   IBQryAdmin->SQL->Add("SELECT Huella FROM SociosHuellas");
   IBQryAdmin->Active=true;
   Ovt=IBQryAdmin->FieldByName("Huella")->AsVariant;

En las pruebas que hice parece funcionar bien, si tienen algún comentario o corrección se los agradecería mucho.