FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Imagenes BMP
Posts: 115
Joined: Sat Mar 07, 2009 09:36 PM
Imagenes BMP
Posted: Tue Aug 10, 2010 04:56 PM

Hola Foro, Solicito ayuda
estoy haciendo un programa para una ferreteria y con en numero de articulo guardo una imagen ejemplo 12345.bmp en una carpeta

tengo un dialogo donde hay botones que navegar por los registros pero no me actualiza la imagen se queda en la primer imgen....

estoy usando esta instruccion

el campo imagen es del tipo "C" y hay un numero

@ 10,10 BITMAP oIma FILE "Alltrim(Articulo->Imagen)+".bmp" SIXE 62,62 PIXEL NOBORDER UPDATE OF oDlg

la pregunta es tengo que refrescar el objeto oIma .... hay un ejemplo con oImaSetBmp() poro no se apleca ....

en los botones coloco la instruccion oDlg:UpDate()
si alguien tiene algun ejemplo se lo voy agradecer
desde ya muchas gracias

mi correo es juanca252@yahoo.com.ar

Posts: 592
Joined: Tue Mar 14, 2006 11:34 PM
Re: Imagenes BMP
Posted: Tue Aug 10, 2010 05:53 PM

Juan,

oImg:LoadBmp( "ruta\nombrebmp" )
oImg:refresh()

Saludos

FWH 10.6 + xHarbour + Borland 582
Posts: 1710
Joined: Tue Oct 28, 2008 06:26 PM
Re: Imagenes BMP
Posted: Tue Aug 10, 2010 07:45 PM
Juan, yo la hago asi:

Code (fw): Select all Collapse
@10,10  IMAGE oFoto OF oDlg NOBORDER ADJUST

oBrw:bChange:={|| BuscaFoto() } 
.
.
.
Function BuscaFoto()
      vFoto:="C:\FOTOS\"+Alltrim(Articulo->Imagen)+".BMP"
    oFoto:LoadBmp( vFoto )
Return Nil


Saludos

Adhemar
Saludos,



Adhemar C.
Posts: 115
Joined: Sat Mar 07, 2009 09:36 PM
Re: Imagenes BMP
Posted: Tue Aug 10, 2010 10:45 PM

Gracias gente.... prove las dos opciones y las dos funcionan okis , espero poder serles util en algo , estoy tratando de hacer un sistema con base de datos tipo mdb con los ejemplos de BielSoft ,, y creo haber soluccionado algunos problemas como la creacion y borrado de tablas ademas los bruwses estoy usando arreglos ... bueno si hay algo en que les pueda ser utiles me lo piden y asi sera.... nuevamente gracias foro .

Continue the discussion