Mailing List Archive: 49091 messages
  • Home
  • Script library
  • AltME Archive
  • Mailing list
  • Articles Index
  • Site search

[REBOL] How to assign an event to a text-list face?

From: javier::aviles::eds::com at: 11-Jun-2001 10:17

Hello Rebolers, I have the next layout: lla_llave: get-keylines db-llamada record-llamada pnl_llam: layout [ origin 0x0 style lab label 70 right h2 "CONTROL DE LLAMADAS" across lab "Ingeniero:" ing_pnl_llam: text 70 return tl_llam: text-list 100x200 data lla_llave rate 1 feel [engage: func [face act evt] [ print "Hello" lla_llave: get-keylines db-llamada record-llamada]] [ if exists? db-llamada [ load-data record-llamada dbllamada db-llamada rcd-llam: find-data tl_llam/picked dbllamada fch_pnl_llam/text: rcd-llam/fecha hra_pnl_llam/text: rcd-llam/hora usu_pnl_llam/text: rcd-llam/sesion pro_pnl_llam/text: rcd-llam/problema est_pnl_llam/text: rcd-llam/status show [fch_pnl_llam hra_pnl_llam usu_pnl_llam pro_pnl_llam est_pnl_llam] ] ] at 110x55 lab "Fecha:" fch_pnl_llam: text 80 at 110x75 lab "Hora:" hra_pnl_llam: text 80 at 110x95 lab "Usuario:" usu_pnl_llam: text 80 at 110x115 lab "Problema:" pro_pnl_llam: text 250x80 at 110x195 lab "Estatus:" est_pnl_llam: text 80 return across button 70 "Nuevo" button 70 "Baja" button 70 "Cambio" button 70 "Consulta" ] On the text-list tl_llam facet I want an event that be triggered each 30 seconds, on this event I want to update the information contained on text-list.... What I should do? thanks for your help guys!!! Javier H. AvilÚs Avila.
* [javier--aviles--eds--com] TEL. 49-61-00 Ext. 56361