como refrescar un listbox

[jpcavagnaro]

Hola buenos días, estoy mostrando en una pantalla datos que se van generando desde otro puesto de trabajo

Lo que necesito es que se refresque el listbox cada n segundos sin tener que hacer click para que me muestre los datos.

[karinha]

use a TIMER,

Code: Select all  Expand view  RUN

   olbx:GoBottom()
   oLbx:Refresh()
   oLbx:GoTop()
 

Regards, saludos.

[jpcavagnaro]

Gracias por responder, no me estaba funcionando el timer, lo declare así:

ACTIVATE DIALOG oDlg ON INIT ( oDlg:SetPos( 0, 0 ), oDlg:nWidth := GetSysMetrics( 0 ), oDlg:nHeight := GetSysMetrics( 1 ), BuildTimer( oDlg, obrow ))

function BuildTimer( oDlg, wobrow )
local oTmr
DEFINE TIMER oTmr OF oDlg ;
ACTION busco(wobrow) INTERVAL 10000
ACTIVATE TIMER oTmr
return nil

De esta manera funciono perfecto.