EVENT evento ([param1], [param2], ...[paramn]) [as boolean]
Esto es que el evento puede llevar o no parámetros y puede o no devolver un valor boleano. Este valor boleano valdrá TRUE si el evento fue cancelado.
Invocación del evento
raise evento(param1, param2, ..., paramn)
Dim Cancelado as boolean
event MiEvento(Nombre as string) as boolean
Cancelado=raise Evento ("Perico")
if Cancelado then
message.info("El evento fue cancelado")
else
message.infor("el evento no fue cancelado")
endif
event MiEvento(Nombre as string) as boolean
Cancelado=raise Evento ("Perico")
if Cancelado then
message.info("El evento fue cancelado")
else
message.infor("el evento no fue cancelado")
endif
Detener un evento
stop event
Debe ser utilizado dentro de una rutina de gestión de error. Cuando se utiliza el evento se cancela y si debía devolver algún valor boleano este será TRUE.
PUBLIC SUB MiTextBox_KeyPress()
IF Instr("0123456789", Key.Text) = 0 THEN
STOP EVENT
ENDIF
END SUB
IF Instr("0123456789", Key.Text) = 0 THEN
STOP EVENT
ENDIF
END SUB
Retrasar un evento
wait tiempo
El tiempo es opcional y admite decimales. Esperar un poco puede ser WAIT 0.1
Si no se indica tiempo entonces se ignora cualquier evento de teclado y ratón mientras se procesan los eventos. Por consiguiente es obligar al usuario a ver lo que ocurre y que tenga que esperar.
Object.attach
Método de la clase object para enlazar un objeto a un evento.
Attach ( Objeto AS Object, Padre AS Object, Evento AS String )
Evento es el nombre usado para buscar manipuladores de eventos en el objeto padre.
PUBLIC Proceso1 AS Process
...
Proceso1 = SHELL "find /" FOR READ
Objeto.Attach(Proceso1, ME, "Proceso1")
...
PUBLIC SUB Proceso1_Read()
Message.Info("¡Salida del proceso 1!")
' puedes leer y hacer alguna acción con la salida...
END
...
Proceso1 = SHELL "find /" FOR READ
Objeto.Attach(Proceso1, ME, "Proceso1")
...
PUBLIC SUB Proceso1_Read()
Message.Info("¡Salida del proceso 1!")
' puedes leer y hacer alguna acción con la salida...
END
objetct.Detach
Objeto.detach(Padre)
Separa un objeto de su observador.
Los eventos disparados a partir de este momento se ignorarán.
