FoxPro/Visual FoxPro - ComboBox

 
Vista:

ComboBox

Publicado por Esther Serrano (2 intervenciones) el 17/05/2006 20:50:21
Hola:

Necesito de su ayuda.

Tengo en un formulario dos cuadros combinados que tienen lista desplegable, éstas son iguales. Lo que necesito es validar que el usuario no seleccione lo mismo y enviarle un mensaje que le especifique que elija otro diferente.

De antemano gracias por su ayuda.

Reciban saludos.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:ComboBox

Publicado por Plinio (7841 intervenciones) el 17/05/2006 20:57:11
IF ALLTRIM(UPPER(thisform.combo1.value))==ALLTRIM(UPPER(thisform.combo2.value))
*****codigo aqui
endif
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:ComboBox

Publicado por Esther Serrano (2 intervenciones) el 17/05/2006 21:23:32
Muchas gracias Plinio.

Tengo algo parecido a lo que me dices, pero no me regresa nada. Esto lo puse en el procedimiento valid. Estará correcto ahí.

Lo que tengo es lo siguiente:

IF ALLTRIM(thisform.combo1.value) == ALLTRIM(thisform.combo2.value)
RETURN .f.
ELSE
RETURN .t.
ENDIF

Nuevamente gracias.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:ComboBox

Publicado por Ernesto Hdez. (5 intervenciones) el 18/05/2006 04:32:01
Tengo en un formulario dos cuadros combinados que tienen lista desplegable, éstas son iguales.
Lo que necesito es validar que el usuario no seleccione lo mismo y enviarle un mensaje que le especifique que elija otro diferente.

En que momento necesitas mandar el mensaje prueba tu codigo en el LostFocus del segundo combo.

o prueba poniendo de esta forma en el valid

IIF(ThisForm.cbo1.value==ThisForm.cbo2.value,return .f.,return .t.)

no olvides determinar de que manera quieres que chekee el EXACT

SET EXACT ON o OFF
Recuerda que el ON cheka caracter por caracter en cada una de las cadenas.

Suerte.

Lo mejor para ti.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:ComboBox

Publicado por Gabriel (427 intervenciones) el 19/05/2006 16:51:53
Amiga Esther :
La codificacion que te muestro la utilizo para verificar si el Valor Existe...

* Antes de Agregar nos seguramos que el valor no este en el COMBOBOX desplegable
IF nKeyCode = 13 && ENTER
lItemExist = .F. && Se supone que el valor no esta en la lista
FOR I = 1 To THIS.ListCount
IF Upper(This.List(I)) = Upper(Alltrim(THIS.DisplayValue))
lItemExist = .T. && Existe el Valor
Exit
ENDIF
ENDFOR

Ahora bien segun la codificacion que estas aplicando utiliza el siguiente.
En donde pones :

Thisform.ComBo1.Value cambialo por Thisform.Combo1.DisplayValue

Espero te sirva mis sugerencias...

Saludos,

GABRIEL
(Lima-Perú)
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar