Dim Txt as textbox , obs as observer
obs =new observer(txt) ---> crear un observador para el objeto txt
Ahora observar el evento change
public sub obs_change
debug "primero ocurre esto" ---> aún no ha ocurrido el evento change del txt
end
public sub txt_change( )
debug "y esto despues"---> este es el evento change del txt
end
obs =new observer(txt) ---> crear un observador para el objeto txt
Ahora observar el evento change
public sub obs_change
debug "primero ocurre esto" ---> aún no ha ocurrido el evento change del txt
end
public sub txt_change( )
debug "y esto despues"---> este es el evento change del txt
end
Si se cancela el evento en el bloque de código del observer el objeto (en este caso el txt nunca lo verá).
Dim Txt as textbox , obs as observer
obs =new observer(txt) ---> crear un observador para el objeto txt
Ahora observar el evento change
public sub obs_change
stop event
end
public sub txt_change( )
debug "nunca llega aquí"
end
obs =new observer(txt) ---> crear un observador para el objeto txt
Ahora observar el evento change
public sub obs_change
stop event
end
public sub txt_change( )
debug "nunca llega aquí"
end
