Отправляет email-рассылки с помощью сервиса Sendsay

Screen reader JAWS for Windows Russian

[JFWRus] цикл While

здравствуйте уважаемые подписчики.
помогите справится со следущей задачей
нужно выбрать элемент из combobox ниже привожу код:
While (GetWindowText (GetFocus (), TRUE) != "russian")

NextLine ()

EndWhile

это работает если фокус находится выше элемента иначе комп зависает.

какое условия включить
для того, чтобы прерывать работу цикла после некоторого числа повторений.

с уважением Леонид.

***
Это сообщение No 8880
было разослано для 511 участников дискуссионного листа
[JFWRus] цикл While

Ответить   Tue, 22 Sep 2009 04:17:55 +0300 (#908178)

 

Ответы:

Доброго времени суток,Леонид.

Из сообщения от 22.09.2009 7:42:

Const
Limit = 33 ; исключительно для примера
; ...
Let i = 0
While GetWindowText (GetFocus (), TRUE) != "russian" &&i < Limit
NextLine ()
Let i = i + 1
EndWhile

Хотя выбранный метод доступа к элементам комбо-списка
явно не является оптимальным.

С уважением, Руслан Усачев

***
Это сообщение No 8887
было разослано для 511 участников дискуссионного листа
[JFWRus] Re: цикл While

Ответить   Tue, 22 Sep 2009 08:13:44 +0300 (#909073)