Refrescar un TStatusBar
Publicado: Mar Feb 21, 2006 3:43 am
Saludos
Tengo una ventana donde ejecuto un proceso y qusiera mostrar un mensaje y
colocar y progressbar en un statusbar. Empece con el mensaje y tengo el
siguiente codigo :
FOR EACH aITem IN aData
cOrigen := aItem[ 2 ]
cDestino := ::oConfig:cTempDir + SUBSTR( cOrigen,RAT( "/", cOrigen ) +
1 )
MsgInfo( cDestino )
::oStatusBar1:cText:= cDestino
//::DownLoad( cOrigen, cDestino )
NEXT
Sin embargo no me muestra nada en la linea ::oStatusBar1:cText:= cDestino a
pesar de que tengo el Statusbar con lSimple := .T.
¿ Tengo que agregar un panel para acomodar el progressbar y asi si puedo
mostrar el mensaje y el progress al mismo tienpo ?
Como añado el progress al statusbar ?
Gracias por la atencion
Yamil
Tengo una ventana donde ejecuto un proceso y qusiera mostrar un mensaje y
colocar y progressbar en un statusbar. Empece con el mensaje y tengo el
siguiente codigo :
FOR EACH aITem IN aData
cOrigen := aItem[ 2 ]
cDestino := ::oConfig:cTempDir + SUBSTR( cOrigen,RAT( "/", cOrigen ) +
1 )
MsgInfo( cDestino )
::oStatusBar1:cText:= cDestino
//::DownLoad( cOrigen, cDestino )
NEXT
Sin embargo no me muestra nada en la linea ::oStatusBar1:cText:= cDestino a
pesar de que tengo el Statusbar con lSimple := .T.
¿ Tengo que agregar un panel para acomodar el progressbar y asi si puedo
mostrar el mensaje y el progress al mismo tienpo ?
Como añado el progress al statusbar ?
Gracias por la atencion
Yamil