FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Refrescar imagen BMP dentro de un diálogo
Posts: 117
Joined: Sun Oct 08, 2017 12:51 PM
Refrescar imagen BMP dentro de un diálogo
Posted: Thu Aug 08, 2019 09:25 PM
Hola amigos !

Se que para ustedes ésto es sencillo.
Cuando modifico o edito el registro de un paciente, está la opción de sacar su foto y capturarla.
Pero cuando quiero BORRARLA no se como refrescar la imagen, o sea que salga la imágen en blanco...
Adjunto captura de pantalla.

Todo ésto lo estoy haciendo dentro de un diálogo en uno de los FOLDERs

local oxfoto
local xfoto := alltrim(m->xpathimg)+"\PAC"+strzero(1->paciente,5)+"\FOT"+strzero(1->paciente,5)+".bmp"

REDEFINE IMAGE oxFoto ID 2200 OF oFld:aDialogs[1] FILE xfoto ADJUST UPDATE BORDER

REDEFINE BTNBMP oBmp ID 2113 OF oFld:aDialogs[1] RESOURCE "video" ; //"ver" ;
ON CLICK fotos() ;
TOOLTIP "Tomar Fotos del Paciente" BORDER
REDEFINE BTNBMP oBtn ID 2114 OF oFld:aDialogs[1] ; // <----------- AQUI BORRO LA IMAGEN, PERO AL HACERLO QUIERO QUE LA MISMA SE QUEDE EN BLANCO.
ON CLICK ( FERASE(xfoto), xfoto:="",oxFoto:Refresh(),oFld:aDialogs[1]:Refresh() ) ;
TOOLTIP "Borrar Foto" BORDER

Uso FWH.17.09
Muchas gracias !

Pedro L. Lavallen

San Luis (Capital), Argentina
Posts: 346
Joined: Mon Oct 05, 2009 03:35 PM
Re: Refrescar imagen BMP dentro de un diálogo
Posted: Thu Aug 08, 2019 09:45 PM
hola:

yo tambien ocupo IMAGE para las fotos, prueba con :

Code (fw): Select all Collapse
oxFoto:Clear()
oxFoto:Refresh()


quedaria asi:

Code (fw): Select all Collapse
REDEFINE BTNBMP oBmp ID 2113 OF oFld:aDialogs[1] RESOURCE "video" ; //"ver" ;
ON CLICK fotos() ;
TOOLTIP "Tomar Fotos del Paciente" BORDER
REDEFINE BTNBMP oBtn ID 2114 OF oFld:aDialogs[1] ; // <----------- AQUI BORRO LA IMAGEN, PERO AL HACERLO QUIERO QUE LA MISMA SE QUEDE EN BLANCO.
ON CLICK ( FERASE(xfoto), xfoto:="",   oxFoto:Clear()   ,oxFoto:Refresh(),oFld:aDialogs[1]:Refresh() ) ;
TOOLTIP "Borrar Foto" BORDER



Saludos
SkyPe: armando.lagunas@hotmail.com

Mail: armando.lagunas@gmail.com
Posts: 117
Joined: Sun Oct 08, 2017 12:51 PM
Re: Refrescar imagen BMP dentro de un diálogo
Posted: Thu Aug 08, 2019 11:11 PM

Excelente Armando !!!
funcionó de 10 !
(No conocía la función Clear()...)
Muchas gracias.
Pedro.

Pedro L. Lavallen

San Luis (Capital), Argentina

Continue the discussion