Перейти к содержимому

M.A.N.

Регистрация: 03 фев 2005
Offline Активность: 17 июн 2005 11:03
-----

Мои темы

Программное установление свойств

14 июня 2005 - 12:16

Здравствуйте!
В программе на Delphi имеется элемент PageControl с несколькими TabSheet.
Хочу из TestComplete переключить активный TabSheet.
По некоторым причинам

w.PageControl.Click('Параметры');

мне не подходит.
Необходимо сделать это через свойства PageControl.
В Delphi можно сделать так:

PageControl.ActivePage := ParamsSheet;

Пытаюсь по аналогии сделать в TestComplete:

w.PageControl.ActivePage := w.ParamsSheet;

Но не проходит - Invalid variant type conversion property: ActivePage
Подскажите выход.
Заранее благодарен.

как проверить наличие ветви в TreeView?

21 марта 2005 - 09:35

Уважаемые тестировщики!
Подскажите, пожалуйста, как проверить наличие ветви в дереве на базе компоненты TTreeView в Delphi перед кликом?

m.NavigatorTree.Click('|Все документы|'+archive_name);

try... except не помогает, т.к. это не exception, а просто error...

Можно последовательно перебирать все узлы текущей ветки и проверять их текст, но, возможно, существует более короткое и элегантное решение?

Проблема после запуска тестируемого приложения

16 марта 2005 - 15:06

Уважаемые тестировщики!
Проблема:
Запускаю из TestComplete тестируемое приложение:

app := TestedApps.Items[0];
p := app.Run;

Затем в тесте пристутствует фрагмент:

w := p.WaitWindow('TMessageForm','*',-1,1000);
if w.Exists then
begin
w.Activate;
w.OK.Click;
end;

TestComplete не может найти OK, хотя если приложение запускать вручную, то всё нормально.
Причем присутствует какая-то непонятная "избирательность" в распознавании при программном запуске приложения: что-то распознается, что-то нет. Хотя при ручном запуске и дальнейшем вызове

p := Sys.Process('App');

и т д. всё работает на "Ура".

KAV Monitor может мешать работе TestComplete

15 марта 2005 - 14:42

Обнаружил, что KAV Monitor может мешать работе TestComplete.
В частности записал при помощи Record короткий фрагмент из 2-х нажатий на кнопки. (вторая становится видима после нажатия на первую).

w.ForwardButton.Click;
w.ShelfNameEdit.TWinControl_1.Click();

ShelfNameEdit - самописная компонента в Delphi (Edit с кнопочкой справа, которая в данном примере распозналась как TWinControl_1).
Так вот - при включенном KAV Monitor TestComplete отказывается ее находить.
Помогает либо отключение KAV Monitor, либо не совсем элегантное решение Sys.Delay(1) между кликами.

TestComplete не видит окно

03 февраля 2005 - 09:30

Здравствуйте!
Проблема:
TestComplete не видит окно типа MessageDlg, ( например фрагмент кода Delphi):

try
StrToInt('foo');
except
MessageDlg('Error!', mtError, [mbOK], 0);
end;

Хотя если самому создать исключительную ситуацию и записать с помощью Record, то окно распознается.