Добавление в проект нового Project Item во время выполнения скрипта

Доброго времени суток!
Можно ли сделать так, чтобы TestComplete в процессе выполнения скрипта проверял наличие в скрипте элемента ODT и, если его нет, создавал его сам.

TestComplete 7.52
DelphiScript

Доброго времени суток!
Можно ли сделать так, чтобы TestComplete в процессе выполнения скрипта проверял наличие в скрипте элемента ODT и, если его нет, создавал его сам.

TestComplete 7.52
DelphiScript

Если я правильно понял, то нужно чтобы в скрипте определялось , есть ли в ODT.Data нужная вам группа..если ее нет , то создавалась эта группа..
Если так, то можно использовать такой прием

var a = "GroupName";
    var s = 0;    
    for (var i=0;i<ODT.Data.GroupCount;i++)
    {
        if (ODT.Data.Groups(i).Name == a)
        {
            Log.Message("Группа с таким именем уже есть");
            s++;
            break;
        }         
    }  
    if (!s)
    {
        ODT.Data.AddGroup(a);
        Log.Message("Группа добавлена");
    }

Аналогичным путем можно узнать есть в той или иной группе нужные свойства\методы, и если их нет создавать
Единственное что написал на языке JavaScript

XXX, все что вы описали, я уже умею делать. Мне нужно проверять наличие самого ODT в скрипте, если его нет, нужно его добавлять.

Мне нужно проверять наличие самого ODT в скрипте, если его нет, нужно его добавлять.

Добавлять project item'ы динамически нельзя. Если вы планируете использовать какой-то айтем в тесте - надо добавить его заранее вручную.А чтобы проверить наличие в проекте ODT надо проверить, определен ли скриптовый объект (идентификатор) ODT. В JScript, например, это делается вот так:

if (typeof ODT == "undefined") {
  // нет ODT
}
else {
  // есть ODT
}

Мodbear, спасибо за полезный совет!

if (typeof ODT == "undefined") {
  // нет ODT
}
else {
  // есть ODT
}

А как это выглядит в DelphiScript?

if (typeof ODT == "undefined") {
  // нет ODT
}
else {
  // есть ODT
}

А как это выглядит в DelphiScript?

Попробуйте так:

procedure Test;
var ODTExists;
  try
    ODTExists := Assigned(ODT);
  except
  end;

  if ODTExists then
    Log.Message('есть ODT')
  else
    Log.Message('нет ODT');

end;

modbear, спасибо! Работает!