====== IForm Клас======
Реалізує довільний діалог.
<code visualfoxpro>
loDlg = CreateObject('IForm','Додати по шаблону ОГД')	
loDlg.WidthLabel = 100 && Вказує, що TLabel до TTxtBtn відображати окремо
loDlg.WidthControl = 100
loDlg.AddNewObj('_NDoc','TTxtBtn', 'C',32,0, Tran(Val(loRec._NDoc)+1)	,'N документу#Right')
loDlg.AddNewObj('_Suma','TTxtBtn', 'N',15,2, loRec._Suma			,'Сума ЮЗ#.')
loDlg._Suma.Enabled = .F.
loDlg._NDoc.CommandValid = [BProc.Doc.AnyDoc.AnyValid()]
loDlg.Show(1)
If VarType(loDlg)='O' And loDlg.Exit='OK'
   MessageBox('OK')
EndIf
</code>

tcName, tcClass, tcType, tnWidth, tnDec, tValue, tcLabel, tcHelp

^  Член  ^  Тип  ^  Параметри  ^  Опис  ^
^ Init('IForm',[cCaption],[lAutoCenter]) | L | //cCaption//-заголовок; \\ //lAutoCenter//-центрування;| Конструктор |
^ AddNewObj(cClass[,cType]\\ [,nWidth][,nDec][,tValue]\\ [,cLabel][,cHelp]) | L | //cClass//-класс(TTxtBtn);\\ //cType//-тип;\\ //nWidth//-довжина;\\ //nDec//-для др.част N;\\ //cType//-Тип;\\ //tValue//-значення;\\ //cLabel//-пояснення;\\ //cHelp//-допомога;\\| Додає контрол в обьект діалогу.\\ Параметр **cLabel**  може в кінці мати додаткові налаштування:**Сума#Right#.**\\ //**#Right**//-прижимати пояснення вправо; \\ //**#.**//-доповнювати пояснення до контролу крапками;| 
^ WidthControl | N |  | Ширина контролів (по замовчанню 300). |
^ WidthLabel | N |  | Ширина пояснення (по замовчанню 0 - в цьому випадку пояснення буде частиною контрола)  |