Привет всем!
Вот столкнулся с особенностью поведения сабжа - м.б. кому будет интересно (или я чего пропустил...).
Если в методе используется команды установки фокуса на объект страницы, event вызывается столько раз,
сколько раз надавили мышой на закладку страницы. Почему-то считал, что это не так.
Пример для демонстрации ниже:

LOCAL oref
oref = CREATEOBJECT("myForm")
oref.Show(1)

DEFINE CLASS myForm as Form
name = "myForm"
width = 290
height = 120
windowtype = 1 && modal

ADD OBJECT list1 as listbox WITH ;
left = 10, ;
top = 10, ;
height = 100, ;
width = 120
ADD OBJECT myPages as pageframe WITH ;
left = 140, ;
top = 10, ;
height = 100, ;
width = 140

PROCEDURE init
this.myPages.addobject("Page1","myPage")
this.myPages.addobject("Page2","myPage")
this.myPages.addobject("Page3","myPage")
ENDPROC
ENDDEFINE

DEFINE CLASS myPage as Page
ADD OBJECT text1 as textbox WITH ;
top = 10, ;
left = 10

PROCEDURE Activate
thisForm.list1.additem("activate" + STR(this.PageOrder,2))
thisForm.list1.value = thisform.list1.listCount
* если закоментировать следующую строку , эфект пропадает
this.text1.setFocus()
ENDPROC
ENDDEFINE

Hi akurdesov!

А если закомментировав строчку МЫШОЙ кликнуть по текстбоксу (или с клавиатуры перевести фокус на текстбокс) а потом снова по tab-у - то всё снова так-же как и было...
В хелпе написано:

Цитата:

A Page object is activated by user action, such as clicking the tab of the page or clicking a control contained in the page, or if the ActivePage property of the page frame containing it is set to the page's number.

Видимо это надо понимать буквально...