Se帽ores:
Tengo un Dialog NOWAIT con 2 SAY y 2 BMP. A continuaci贸n se ejecutan 2 funciones que suelen durar 20seg. en ejecutarse... Cada SAY informa de la funci贸n que se est谩 ejecutando en ese momento y cada vez que termine una funci贸n deber铆a aparecer el BMP indicando que ya se termin贸 y empez贸 la otra funci贸n. Es decir, en c贸digo ser铆a:
... En definitiva... los bitmaps NO aparecen.... 驴D贸nde est谩 el fallo?
Ser谩 una tonter铆a, pero llevo m谩s de 1 hora con esto y estoy ya mareado.
Mil gracias.
LORENZO.
Tengo un Dialog NOWAIT con 2 SAY y 2 BMP. A continuaci贸n se ejecutan 2 funciones que suelen durar 20seg. en ejecutarse... Cada SAY informa de la funci贸n que se est谩 ejecutando en ese momento y cada vez que termine una funci贸n deber铆a aparecer el BMP indicando que ya se termin贸 y empez贸 la otra funci贸n. Es decir, en c贸digo ser铆a:
聽Define dialog oopen resource 'Revision'
聽 聽redefine say osay[1] prompt 'Comprobando actualizaciones...' 聽id 4001 of oopen
聽 聽redefine say osay[2] prompt 'Revisando tareas pendientes...' 聽 id 4007 of oopen
聽 聽redefine bitmap obmp1 resource 'Aceptar' id 4004 of oopen transparent update
聽 聽redefine bitmap obmp2 resource 'Aceptar' id 4005 of oopen transparent update
聽 activate dialog oopen center NOWAIT
聽 obmp1:hide()
聽 obmp2:hide()
聽 acciones()
return
Funct acciones
聽osay[1]:setcolor(CLR_HRED, GetSysColor( COLOR_BTNFACE )) 聽; oSay[1]:refresh()
聽comprobando()
聽osay[1]:setcolor(CLR_BLACK, GetSysColor( COLOR_BTNFACE )) 聽; oSay[1]:refresh()
聽obmp1:show() 聽 &&--> aqu铆 falla
聽osay[2]:setcolor(CLR_HRED, GetSysColor( COLOR_BTNFACE )) 聽; oSay[2]:refresh()
聽tareas()
聽osay[2]:setcolor(CLR_BLACK, GetSysColor( COLOR_BTNFACE )) 聽; oSay[2]:refresh()
聽obmp2:show() 聽 &&--> aqu铆 falla
return... En definitiva... los bitmaps NO aparecen.... 驴D贸nde est谩 el fallo?
Ser谩 una tonter铆a, pero llevo m谩s de 1 hora con esto y estoy ya mareado.
Mil gracias.
LORENZO.
