ITCSForm Наследование  Функции и процедуры



Пользовательские формы ввода TechnologiCS


Пример на VBScript:

Для работы примера необходимо в справочнике Скриптовые модули создать Форму ввода с наименованием FormModule1
Sub TestForm
   Set Form = TCSApp.TCSForm( "FormModule1", False )
   Form.Left = 10
   Form.Top = 10
   Form.Height = 200
   Form.Width = 200 
   Form.Caption = "Тестируем форму ввода"
   Form.ShowModal
End Sub
Реализует интерфейсы:
IModule