tComboBox():New(052,008,{|u|if(PCount()>0,cTipo:=u,cTipo)},aTipo,070,008,oDlg1,, ,,,,.T.,,,,,,,,,'cTipo')

Private lReadOnly := .T. If U_ORTVLCPD() .OR. ('.20' $ cUserName) lReadOnly := .F. Endif

tComboBox():New(052,008,{|u|if(PCount()>0,cTipo:=u,cTipo)},aTipo,070,008,oDlg1,, ,,,,.T.,,,,,,,,,'cTipo')

Private lReadOnly := .T. If ('.20' $ cUserName) lReadOnly := .F. Endif