FiveTech Support Forums

Despues de tiempo, saludos foro:

Abajo, expongo una funcion donde el valid del segundo combobox no me funciona con el valid que le pongo:

                           VALID {||eval(oCbx2:bSetGet)>=eval(oCbx1:bSetGet)} PIXEL of bPant

o
VALID {||cPer2>=cPer1} PIXEL of bPant

esto para indicarle el oCbx2 que el valor de este sea mayor o igual al valor del oCbx1

pero, no respeta el valid, alguna sugerencia?

//
function PidePer(oCbx1,oCbx2,cPer1,cPer2,r,c,bPant)
local aPer1,aPer2

aPer1:={'01','02','03','04','05','06','07','08','09','10','11','12'}
aPer2:=aPer1
if cPer1==NIL
cPer1:=MES_POL
endif
if cPer2==NIL
cPer2:=MES_POL
endif
@ r,c say 'Del periodo' of bPant
@ r,c+12 COMBOBOX oCbx1 VAR cPer1 PICTURE '99' STYLE CBS_DROPDOWN ITEMS aPer1 ON CHANGE oCbx1:SetText(cPer1)
@ r,c+26 say 'Al periodo' of bPant
@ r,c+36 COMBOBOX oCbx2 VAR cPer2 PICTURE '99' STYLE CBS_DROPDOWN ITEMS aPer2 ON CHANGE oCbx2:SetText(cPer2);
VALID {||eval(oCbx2:bSetGet)>=eval(oCbx1:bSetGet)} PIXEL of bPant
oCbx1:oGet:bKeyChar:={|nKey|oCbx1:GetKeyChar(nKey)}
oCbx2:oGet:bKeyChar:={|nKey|oCbx2:GetKeyChar(nKey)}
return NIL

Noe, déjame revisarlo, ya que anoche tuve problemas relacionados con esto.
te comento en el trascurso del día.

salu2

Mira se ayuda:

viewtopic.php?p=75598

http://fivetechsupport.com/forums/viewt ... 1start=30

Saludos.