CreateModule(ModuleName : String) : Variant
Запустить модуль

Функция CreateModule запускает (создает объекты) программные модули, формы, печатные формы, справочники программы и возвращает ссылку на созданный объект.

Аргумент ModuleName содержит имя запускаемого модуля. Если в качестве аргумента ModuleName указана строка, то есть CreateModule('ИмяМодуля'), то возвращаемое значение изменяется с Variant на тип создаваемого объекта.

Пример:

Procedure OnCreate;
Var
  M : Module2;
Begin
  M := CreateModule('Module2');
  Warning(M.MakeText);
End;

// Модуль Module2 содержит метод
Function MakeText : String;
Begin
  Result := SpellRur(1245.12c);
End;

Пример с Variant:

Procedure OnCreate;
Var
  M : Variant;
  ModuleName : String;
Begin
  ModuleName := 'Module2';
  M := CreateModule(ModuleName);
  Warning(M.MakeText As String);
End;

© RTIT