Meter or Progress on Msgbar - Resolved!!

[Silvio.Falconi]

id it possibile to show a meter or progress on a msgbar ?
Someone can post a smal sample pls ?
Thanks

[Silvio.Falconi]

any solution pls ?

[MGA]

define msgitem oMsg of oWnd:oMsgbar size 110

@ 04,oWnd:oMsgbar:nWidth-111 progress oMeter position 0 oWnd:omsgbar size 94,18 pixel

[leandro]

Definir

Code: Select all

DEFINE WINDOW oWChLte MDICHILD  TITLE "Información" ICON "#8001" OF oWnd

   SET MESSAGE OF oWChLte TO "Información "
   @ 04, oWChLte:oMsgBar:nWidth-111 PROGRESS oMeterL POSITION 1 of oWChLte:oMsgBar SIZE 200,18 pixel
   oMeterL:SetRange( 0, 100 )
 

Uso

Code: Select all

  oRsLte:MoveFirst()
  Do While !oRsLte:Eof()

    oRsLte:MoveNext()
    oMeterL:SetPos( oMeterL:nPos + 1 )
    oWChLte:oMsgBar:cMsgDef:="Procesando Registro:"+alltrim(str(oRsLte:AbsolutePosition()))+" De:"+alltrim(str(nRegBarl))
    oWChLte:oMsgBar:Refresh()
    sysrefresh()

  EndDo

 

[Silvio.Falconi]

yes of course But on Wndmain I have a Msgbar with 3 Msgitem
and I wish insert this meter on ::oMsgitem3
when I try it make error hwnd

[Silvio.Falconi]

perhaps now run ok
thanks