probelma de repintado del dialogo
Posted: Fri Mar 13, 2009 4:57 pm
hola a todos:
tengo un problemita:
en un programa de slelecion de un productor para ver su estado de cuenta , estando en el get, con un boton mando a ejecutar otro programa que
desplega el maestro de productores alfabetico, al ejecutar el boton cierro el dialogo del prog. de seleccion .con undoble click selecciono ciero el dialogo y todo bin,
al regresar los datos activo el dialogo del programa de seleccion pero los colores del fondo del dialogo se pintan difrente al original , ya le made refrescar
todo y repintar el dialogo como hago al principio y nada mas no.
totdo esto lo hago ,para que el focus me aparesca otravez en el get de selecion despues de selecionar el productor que si me aparece en el get que quiero.
el avi610() es el programa alfabetico
asi esta el broton que ejecuto:
REDEFINE BTNBMP oBtm3 ID 113 OF oDlg3 RESOURCE "XPGENTE" noborder 2007 font oFont3 ;
ACTION (odlg3:end(),AVI610(CCVENVA,cnombre,fuera3),estabilizar2(),odlg3:refresh(),odlg3:activate(),oDlg3:bPainted = { | hDC | PalBmpDraw( hDC, 0, 0, oBmp:hBitmap ) })
FUNCTION ESTABILIZAR2()
USE (patres+"\aviacum") alias aviacum shared new
set index to c:\temp\aviacum
oGet:refresh()
oLbx:refresh()
oLbx:upstable()
oSay1:refresh()
oBtm3:oJump := oGet
odlg3:refresh()
return (oDlg3) //nil
tengo un problemita:
en un programa de slelecion de un productor para ver su estado de cuenta , estando en el get, con un boton mando a ejecutar otro programa que
desplega el maestro de productores alfabetico, al ejecutar el boton cierro el dialogo del prog. de seleccion .con undoble click selecciono ciero el dialogo y todo bin,
al regresar los datos activo el dialogo del programa de seleccion pero los colores del fondo del dialogo se pintan difrente al original , ya le made refrescar
todo y repintar el dialogo como hago al principio y nada mas no.
totdo esto lo hago ,para que el focus me aparesca otravez en el get de selecion despues de selecionar el productor que si me aparece en el get que quiero.
el avi610() es el programa alfabetico
asi esta el broton que ejecuto:
REDEFINE BTNBMP oBtm3 ID 113 OF oDlg3 RESOURCE "XPGENTE" noborder 2007 font oFont3 ;
ACTION (odlg3:end(),AVI610(CCVENVA,cnombre,fuera3),estabilizar2(),odlg3:refresh(),odlg3:activate(),oDlg3:bPainted = { | hDC | PalBmpDraw( hDC, 0, 0, oBmp:hBitmap ) })
FUNCTION ESTABILIZAR2()
USE (patres+"\aviacum") alias aviacum shared new
set index to c:\temp\aviacum
oGet:refresh()
oLbx:refresh()
oLbx:upstable()
oSay1:refresh()
oBtm3:oJump := oGet
odlg3:refresh()
return (oDlg3) //nil