Отправлено: 17.06.16 16:19. Заголовок: BTNTEXTBOX

Подниму вопрос еще раз.
Имеем на форме BTNTEXTBOX и не один.
Каким образом при нажатии кнопки в BTNTEXTBOX установить фокус ввода на бровсе который
живет в том же окне ? Пробовал в блоке кода ACTION (BTNTEXTBOX) ставить фокус ввода
на бровсе - не вышло.
Если в том же BTNTEXTBOX в ON ENTER в блоке кода в самом его конце установить фокус
ввода на бровсе то все нормально.
Что то я запутался в логике срабатывания BTNTEXTBOX.
Может кто научит ?

 Отправлено: 18.06.16 09:27. Заголовок: Dima пишет: Пробов..

Dima пишет:

цитата:

Пробовал в блоке кода ACTION (BTNTEXTBOX) ставить фокус ввода на бровсе - не вышло.

Может быть можно корректно "убить" GET в BTNTEXTBOX ?
Как это сделать ?

 Отправлено: 18.06.16 11:15. Заголовок: Dima пишет: Может б..

Dima пишет:

цитата:

Может быть можно корректно "убить" GET в BTNTEXTBOX ? Как это сделать ?

Послать нажатие TAB его окну или сообщение WM_KILLFOCUS
PS Может использовать GeBox там тоже есть кнопки и контрол более управляемый

 Отправлено: 18.06.16 11:23. Заголовок: Haz пишет: Может ис..

Haz пишет:

цитата:

Может использовать GeBox

Попробую , спасибо.

 Отправлено: 19.06.16 14:23. Заголовок: Haz пишет: Может и..

Haz пишет:

цитата:

Может использовать GeBox там тоже есть кнопки и контрол более управляемый

Пробнул и не сказал бы что он более управляемый :)

 
          @ 18,obrw:aColumns[2]:nwidth+obrw:aColumns[1]:nwidth+2 ; 
                  GETBOX Text_2 ; 
                  HEIGHT 20; 
                  WIDTH obrw:aColumns[3]:nwidth+obrw:aColumns[4]:nwidth/2 ; 
                  VALUE  0 ; 
                  FONT "Lucida Console" SIZE 10 ; 
                  ACTION {|| codsea( sirie.Text_2.Value,obrw,"cod" ) ,setproperty( "Sirie", "obrw", "Setfocus") }; 
                  IMAGE "find" ; 
                  TOOLTIP {"Точный поиск по коду"} ; 
                  PICTURE '@Z 999999' ; 
                  VALID {|| .t. } ; 
                  BACKCOLOR {{255,255,255},{255,255,200},{200,255,255}} ; 
                  FONTCOLOR {{0,0,0},{255,255,200},{0,0,255}} ; 
                  NOMINUS  
 

ON ENTER процедуры тут нет , поэтому при нажатии на ENTER происходит выход а хотелось бы
что бы происходил поиск и если он удачен происходил выход с переходом фокуса на бровс.
В процедуре ACTION после удачного поиска тоже хотелось выходить с переходом фокуса на бровс

 Отправлено: 19.06.16 14:44. Заголовок: Проехали , как ты и ..

Проехали , как ты и советовал , помог _pushkey( VK_TAB )

ЗЫ
Игорь ты в отпуске ?

 Отправлено: 19.06.16 16:32. Заголовок: Dima пишет: ты в от..

Dima пишет:

цитата:

ты в отпуске

в нем

 Отправлено: 19.06.16 16:37. Заголовок: Dima пишет: ON ENTE..

Dima пишет:

цитата:

ON ENTER процедуры тут нет , поэтому при нажатии на ENTER происходит выход а хотелось бы что бы происходил поиск и если он удачен происходил выход

повесь на Valid который вернет F если не найдено

 Отправлено: 19.06.16 16:43. Заголовок: Dima пишет: и не с..

Dima пишет:

цитата:

и не сказал бы что он более управляемый

а ты в его исходники глянь ))