Сообщений в теме: 15

[unsociable]

Тестируемое приложение запускает процесс как подождать пока он выполнится?

[Melmar]

p := Sys.WaitProcess('ProceeName', Delay);
if not p.Exists then...

Delay - время ожидания в мсек
Не совсем понятно, что подразумевается под "выполнится".

[unsociable]

Приложение запускает процесс(консольное приложение) и надо дождатся пока процесс завершится, там идут расчеты и потому на каждой машине за разное время и в зависимости от объема данных для расчетов.

[Genka]

Тогда сначала ожидаете, пока процесс появится, как описал выше Melmar, а потом

while(Sys.WaitProcess("my_process", 0).Exists)
{
  BuiltIn.Delay(500);
}

но лучше, конечно, в этом бесконечном цикле предусмотреть выход, скажем, через час работы (ну или по своему усмотрению), на случай, если процесс зависнет

Delay нужен для того, чтобы процесс не загружал процессор на 100%

[Bog_dan]

Я вот так делаю:

Set WshShell = CreateObject("WScript.Shell")
path = chr(34) + "C:\...\app.exe" + chr(34)
intReturn = WshShell.Run(path, 0 , true)

последний параметр в методе Run - если true - ждем окончания выполнения процесса, false - соответственно нет

[Genka]

ух ты :)

а что зо ОЛЕ объект такой? откуда инфа про него?

[Dmitry N]

Здравствуйте.

О, это очень полезный OLE объект. :) Информацию о нём можно найти в MSDN Library.

[Genka]

спасибо :)

[AlexP]

ух ты :)

а что зо ОЛЕ объект такой? откуда инфа про него?

http://de.uspu.ru/In...F/19/1/wsh1.htm

[AlexP]

Кстати, открыл для себя следующий способ работы с Excel документом:

// Получение значения ячейки
var ExcelApp;
ExcelApp = new ActiveXObject("Excel.Application");
ExcelApp.Application.Visible = false;
ExcelApp.Workbooks.Open("C:\\TEST.XLS");
var test = ExcelApp.ActiveSheet.Cells(1,1).Value;
ExcelApp.Application.Quit();

[unsociable]

Всем большое спасибо за ответы, тот метод с while я и сам его юзал просто хотелось что то другое вот теперь попробую новый метод ))).
Так же есть еще один вопрос мне нужно както узнать программно что тест прошол удачно. Есть программа которая будет запускать систему тестирования и нужно както показать ей что тест прошол удачно или что с ошибками.

[AlexP]

Так же есть еще один вопрос мне нужно както узнать программно что тест прошол удачно. Есть программа которая будет запускать систему тестирования и нужно както показать ей что тест прошол удачно или что с ошибками.

А можно подробнее узнать о "программе, которая будет запускать систему тестирования", и что входит в систему тестирования? Просто довольно тяжело ответить на Ваш вопрос без этой информации. Простейший вариант - использовать check файл (или переменные окружения), который будет заполняться по мере выполнения теста.

[unsociable]

Программа которая запускает TortoiseSVN. Тесты пока простые на уровне открыть, закрыть. Просто планируется что svn запускает систему тестов а при возникновении ошибок будет отправлять письма с ошибками разработчикам мудулей.

[ss12]

Пришел в голову такой способ.
У объекта Log есть свойства
Log.ErrCount и Log.WrnCount.
Значения этих свойств можно сохранять, скажем в файл, а потом из внешней программы этот файл читать.

[Gala]

Процесс TestComplete при завершении возвращает Exit Code, по которому можно судить об успешности тестов. См. топик "TestComplete Exit Codes"

[Deadlock]

Вообше ТС сохраняет инфу о количестве предупреждений и ошибок в файлик Description.ld для каждого лога.