Como converto Variant em um TMemoryStream?
Olá pessoall!
Estou desenvolvendo uma FrameWork que monta os inserts, updates e deletes automático. Para tanto, tenho que varrer as propriedades da minha classe e buscar o valor delas através do comando getPropValue. O problema é que esse comando me retorna um Variant e ao trabalhar com uma property que é um TMemoryStream que guardará um campo BLOB no banco (imagens, arquivos...), eu tenho que converter esse Variant em TMemoryStream ou fazer um TypeCast para TMemoryStream para poder passa-lo como parâmetro para dentro do meu SQL utilizando Qry.PARAMBYNAME(´CAMPO_BLOB´).LoadFromStream(memoStream,ftBlob). Alguém saderia como se faz isso? :?:
Valeu!!!
Estou desenvolvendo uma FrameWork que monta os inserts, updates e deletes automático. Para tanto, tenho que varrer as propriedades da minha classe e buscar o valor delas através do comando getPropValue. O problema é que esse comando me retorna um Variant e ao trabalhar com uma property que é um TMemoryStream que guardará um campo BLOB no banco (imagens, arquivos...), eu tenho que converter esse Variant em TMemoryStream ou fazer um TypeCast para TMemoryStream para poder passa-lo como parâmetro para dentro do meu SQL utilizando Qry.PARAMBYNAME(´CAMPO_BLOB´).LoadFromStream(memoStream,ftBlob). Alguém saderia como se faz isso? :?:
Valeu!!!
Alissonmn
Curtidas 0