https://foro.gambas-es.org/viewtopic.php?f=1&t=6462&p=38854#p38854
-----------------------------------
vuott
Jueves, 22 Junio 2017, 19:09

Re: Cual Es La Diferencia Entre Watcher Y Observer?
-----------------------------------
La Clase "[i]Watcher[/i]" ofrece la posibilidad de añadir unos especificos eventos más al objeto observado.

Por ejemplo la Clase "[i]Button[/i]" [u]no[/u] tiene eventos: Hide   Move   Resize   Show
Bueno, la Clase "[i]Watcher[/i]" añade estos eventos.

Ejemplo practico.
Vamos a poner sobre el Formulario dos [i]Button[/i].
[code linenumbers=false syntax=gambas]Private w As Watcher


Public Sub Form_Activate()
  
  w = New Watcher(Button1) As "Boton"
  Print w.Control.Name

End


Public Sub Boton_Resize()

  Print "Resize !"

End


Public Sub Button2_Click()

   Button1.Resize(10, 20)

End[/code]


