glamisЕсть некий проект. В нем описан Formset. На одной из форм по нажатию кнопки требуется открыть окно и ввести параметры. Так-как эта операция нужна очень редко и мало кому хочу описать ее как:
_frm=CREATEOBJECT('Form')
_frm.name=SYS(2015)
_frm.left=10
_frm.width=350
_frm.top=10
_frm.height=150
_frm.visible=.t.
_frm.addobject('Text1','Textbox')
_frm.text1.left=10
_frm.text1.width=75
_frm.text1.top=10
_frm.text1.height=25
_frm.alwaysontop=.t.
_frm.show()

При этом форма смигивает. и все...

При попытке поставить _frm.show(1) = выдает ошибку, что не может изменить модальность в видимой форме...

_frm = CreateObject("Form1")
_frm.Show(1)

Define class Form1 as form
AutoCenter = .t.
Name = "Form1"

add object Text1 AS textbox with ;
Alignment = 3, Height = 23, Left = 36, Margin = 2, Top = 24, Width = 100, Name = "Text1"
ENDDEFINE
_frm.name="test"
_frm.left=10
_frm.width=350
_frm.top=10
_frm.height=150
_frm.alwaysontop=.t.