Text: String;
The Text property determines a module text.
Executing the example requires that the repository contains a Java module with the MOD_JAVA identifier.
Add links to the Metabase and Java system assemblies.
Sub UserProc;
Var
Mb: IMetabase;
JavaMod: IJavaModule;
Begin
Mb := MetabaseClass.Active;
JavaMod := Mb.ItemById("MOD_JAVA").Edit As IJavaModule;
Debug.WriteLine(JavaMod.Text);
//...
//Further work with module text
//...
If JavaMod.Modified Then
(JavaMod As IMetabaseObject).Save;
End If;
End Sub UserProc;
The specified example generally displays how to get Java module text. The text will be displayed in the development environment console. If there are any changes made to the text, the Java module will be saved.
See also: