FiveTech Software tech support forums

... creadas con la clase TWebCam y se guardan en formato BMP en una tabla MySql Las Imagenes las recupero asi: oPict := TBitMap():Define() ... oPict:LoadFromString( HB_Base64Decode( oQuery:FieldGet( "ENTRADA" ) ) ) // Se lee desde la tabla MySql con TDolphin ... oReporte:SayBitmap( aCoors[ ...

... "Espere por favor", {|| nSize := StrFile( HB_HexToStr( oQryTmp:ARCHIVO ), cFileExtract ) } ) en tu caso podrias usarlo ::oImagen:LoadFromString( HB_HexToStr( oQryTmp:ARCHIVO ) ) En mi caso convierto la cadena regresada por StrFile y lo paso a hexadecimal lo cual duplica en tabla ...

... como haces el REDEFIne? porque intento hacerlo y sigo con el mismo problema:   REDEFINE IMAGE ::oImagen ID 300 OF oDlg ADJUST update   ::oImagen:LoadFromString( ::oQry:FieldGet("c19") )   ::oImagen:refresh()  Tira este error: Time from start: 0 hours 0 mins 28 ...

Hola

Yo lo hago de la siguiente manera y me funciona perfecto:

oFoto := TBitMap():Define()

oFoto:LoadFromString( oQFotos:FieldGet( "ENTRADA" ) )

Espero te funcione

Saludos!

Eduardo Borondón Muñiz

acuellar wrote:Es la del pronóstico del tiempo.

Del post Meteo.prg

Gracias,

Saludos,


Adhemar

no tenemos aún funcionando como se debe el loadFromMemory ( que no es lo mismo que loadFromstring )

I finally found what I was after reading TBitmap class source, there is a very useful LoadFromString() method that doesn't appear to be documented. It shows not only how to solve my current need, but also illustrates how to do the behind the scenes manipulation.

I can make progress again.

Robb

Thank you, that was quick.

I finally found what I need, or at least what I can use. There is a TBitmap() method named LoadFromString() that does the trick. Finally found it in the source code, it doesn't appear to be documented otherwise.

Thank you so much for the reply.

Robb

... odbprn13:cquery:="select cvalue from fr3 where id='"+SUBSTR(cid1,1,i-1+2)+"'" odbprn13:refresh() end end FrPrn:LoadFromString(odbprn13:cvalue) odbprn13:end() do case case lpreview==nil FrPrn:designReport() if msgyesno("保存打印设置修改到ERP系统","save!") ...

... {|| odbprn2:GoTop()} ,; {|| odbprn2:SKIP(1)},; {|| odbprn2:SKIP(-1) },; {|| odbprn2:EOF() },; {|aField|odbprn2:FIELDGET(afield)}) FrPrn:LoadFromString(odbprn13:cvalue) // saved .fr3 from mysqldatabase blob field //or FrPrn:LoadFromFile(RepDir + "1.fr3") do case case lpreview==nil ...

Saludos...

Ahora si solo usas .BMP creo que la funcion CreateMemBitmap te podria servir tambien, o usando la clase TBitmap el metodo LoadFromString revisa este otro post: http://forums.fivetechsupport.com/viewtopic.php?p=49250#p49250

Hola Horacio: Gracias manuel, estuve probando y me encuentro con el inconveniente que el método bitmap : LoadFromString no lo tengo en la versión que trabajo, fwh 7.12. Hay alguna manera de suplir este método. De todas maneras comentariando el mismo funciona. Pero me gustaría ...

Gracias manuel, estuve probando y me encuentro con el inconveniente que el método bitmap : LoadFromString no lo tengo en la versión que trabajo, fwh 7.12. Hay alguna manera de suplir este método. De todas maneras comentariando el mismo funciona. Pero me gustaría poder usar el selector por defecto.

... Guardarla en un campo Memo de MYSQL ? Si se puede guardar imagenes en un campo BLOB (equivalente a un MEMO, pero mas potente) 3.- Bastara con LoadFromString() para mostrarla ? SI, dependiedo del "manejador" de MySQL que estes usando,,, EAGLE1, TMySQL, SQLRDD.. Salu2

... formato, por ej. descargada de la web gif, png, jpg ) en un area de un dialogo ? 2.- Puedo Guardarla en un campo Memo de MYSQL ? 3.- Bastara con LoadFromString() para mostrarla ? Cualquier ayuda sera bienvenida. ATTE. Desde Chile Adolfo

Buen aporte César,gracias. Lo he implementado en mi clase que hereda de tImage y funciona perfecto.
Quizas este nuevo metodo se podria unificar con el ya existente LoadFromString (tBitMap).