!7

sclass TextInFocusedComponent > DynPrintLog {
  transient S text;
  
  start {
    doEveryAndNow(2000, r {
      if (setField(text := getText_gen(getFocusOwner())))
        print("Got: " + quote(shorten(text, 100)));
    });
  }
}