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
Valid en ComboBox, no funciona!!!
- noe aburto
- Posts: 418
- Joined: Wed Nov 26, 2008 6:33 pm
- Location: Morelia, Mich. Mexico.
Valid en ComboBox, no funciona!!!
Noé Aburto Sánchez
Tec. Prog. de Sistemas. -Morelia, Mich. México.
fwh 20.06, Harbour 3.2.0, bcc 7.4
TsBrowse 9.0, TsButton 7.0, xEdit 6.1
naburtos@gmail.com, noeaburto67@hotmail.com
Tec. Prog. de Sistemas. -Morelia, Mich. México.
fwh 20.06, Harbour 3.2.0, bcc 7.4
TsBrowse 9.0, TsButton 7.0, xEdit 6.1
naburtos@gmail.com, noeaburto67@hotmail.com
- carlos vargas
- Posts: 1723
- Joined: Tue Oct 11, 2005 5:01 pm
- Location: Nicaragua
Re: Valid en ComboBox, no funciona!!!
Noe, déjame revisarlo, ya que anoche tuve problemas relacionados con esto.
te comento en el trascurso del día.
salu2
te comento en el trascurso del día.
salu2
Salu2
Carlos Vargas
Desde Managua, Nicaragua (CA)
Carlos Vargas
Desde Managua, Nicaragua (CA)
- karinha
- Posts: 7963
- Joined: Tue Dec 20, 2005 7:36 pm
- Location: São Paulo - Brasil
- Been thanked: 5 times
- Contact: