Посоветуйте как можно программным путем задать TestC:
Если есть такой объект TThroughPanel,
то выполняй действия.
Текст такой:
Call m.Window("TThroughPanel", "", 42).Click(12, 5)
Set w = p.Window("TfmPayer", "Критерии отбора")
w.Activate
w.Window("TButton", "Отмена").Click
Посоветуйте, как это реализовать!
Запуск теста!
Автор natali.ancharuk, 24 июн 2005 09:44
Сообщений в теме: 4
#1
natali.ancharuk
-
- Members
-
- 72 сообщений
Новый участник
- ФИО:Анчарук Наталья Владимировна
Отправлено 24 июня 2005 - 09:44
#2
Closer
-
- Members
-
- 6 сообщений
Новый участник
- ФИО:Максим Добряков
Отправлено 24 июня 2005 - 12:08
RTFM :)
Открываем справку по TC и читаем в описании свойства "Window.Window":
The Window method searches for a window within a given window's child list. If successful, this method returns the found window, otherwise it returns an empty object and posts an error message to the test log. Call Exists to determine whether the returned object exists.
т.е. код приблизительно будет такой (JScript):
Открываем справку по TC и читаем в описании свойства "Window.Window":
The Window method searches for a window within a given window's child list. If successful, this method returns the found window, otherwise it returns an empty object and posts an error message to the test log. Call Exists to determine whether the returned object exists.
т.е. код приблизительно будет такой (JScript):
var oTestWindow = m.Window("TThroughPanel", "", 42);
if(oTestWindow.Exists)
{
// Твоё действие
}
#3
Scorp-13
-
- Members
-
- 285 сообщений
Co-Moderator: Спорт, Кино и музыка
- ФИО:Евгений
- Город:Украина, Запорожье
Отправлено 24 июня 2005 - 12:15
Т.е. нужно проверить наличие объекта TThroughPanel ? Если правильно понял, то:
if TThroughPanel.exists and TThroughPanel.visible then begin код end;
Ab altero expectes, alteri quod feceris
#4
natali.ancharuk
-
- Members
-
- 72 сообщений
Новый участник
- ФИО:Анчарук Наталья Владимировна
Отправлено 24 июня 2005 - 13:17
Спасибо за совет, помоему получилось!!!!
!!!!!!!!!!!!!!!!!!!
!!!!!!!!!!!!!!!!!!!
#5
Dmitry N
-
- Members
-
- 1 742 сообщений
Профессионал
- ФИО:Николаев Дмитрий
- Город:Где-то в России
Отправлено 27 июня 2005 - 08:41
Здравствуйте.
Хочу добавить, что лучше использовать метод WaitWindow. Он не кидает в лог ошибку в случае неудачи:
Хочу добавить, что лучше использовать метод WaitWindow. Он не кидает в лог ошибку в случае неудачи:
[VBScript]
Set wnd = m.WaitWindow("TThroughPanel", "", 42)
If wnd.Exists Then
wnd.Click(12, 5)
Set w = p.Window("TfmPayer", "Критерии отбора")
w.Activate
w.Window("TButton", "Отмена").Click
End If
С уважением,
Дмитрий
Дмитрий
Количество пользователей, читающих эту тему: 1
0 пользователей, 1 гостей, 0 анонимных
