Text: String;
Свойство Text определяет текст модуля.
Для выполнения примера предполагается наличие в репозитории Python-модуля с идентификатором MOD_PYT.
Добавьте ссылки на системные сборки: Metabase, Python.
Sub UserProc;
Var
Mb: IMetabase;
PythonMod: IPythonModule;
Begin
Mb := MetabaseClass.Active;
PythonMod := Mb.ItemById("MOD_PYT").Edit As IPythonModule;
Debug.WriteLine(PythonMod.Text);
//...
//Дальнейшая работа с текстом модуля
//...
If PythonMod.Modified Then
(PythonMod As IMetabaseObject).Save;
End If;
End Sub UserProc;
Указанный пример в общем виде демонстрирует каким образом можно получить текст Python-модуля. Текст будет выведен в консоль среды разработки. Если в текст будут внесены какие-либо изменения, то Python-модуль будет сохранён.
См. также: