ob = CREATEOBJECT("new")

IF VARTYPE (ob) = [O]
ob.closable=.t.
*ob.backcolor=rgb( 10 , 130 , 100 )
ob.caption="Форма редактирования"
ob.height= 400 
ob.width= 825 
  ob.SHOW()
    CLEAR CLASS new
 ENDIF
 
 
DEFINE CLASS new AS _issform 

ADD OBJECT line3 AS line with;
 left= 12 ,;
 top= 12 ,;
 width= 324 ,;
 heigh= 0 
 
ADD OBJECT line4 AS line with;
 left= 12 ,;
 top= 392 ,;
 width= 324 ,;
 height= 0 
 
ENDDEFINE