Sigo con los valores perdidos de los items

[Laurel]

Hola Antonio!

Ya revise lo que me indicaste del metodo CHANGE... esta exactamente igual...¿que otra cosa puedo revisar...? estoy atorada y no se que más hacer.

Gracias

Laurel

[Antonio Linares]

Este ejemplo funciona bien aqui. Por favor pruébalo y dime si funciona bien:

Code: Select all

#include "FiveWin.ch"

function Main()

   local oDlg, nValor := 1

   DEFINE DIALOG oDlg

   @ 1, 2 COMBOBOX nValor ITEMS { "Hombre", "Mujer" } 

   @ 2, 10 BUTTON "Valor" ACTION MsgInfo( nValor )

   ACTIVATE DIALOG oDlg CENTERED

return nil

[Laurel]

Hola!

Si funciona.... y tambien me funcionaba... que raro....

Laurel

[Laurel]

¿Qué crees que estará afectando??

y lo peor es que no solo a mi me paso... tambien le sucede lo mismo a un compañero que ya tenía funcionando su programa...

Gracias.

Laurel

[Antonio Linares]

Laurel,

Comprueba que la variable que almacena el valor inicial sea de tipo numérico:

local oDlg, nValor := 1

@ 1, 2 COMBOBOX nValor ITEMS { "Hombre", "Mujer" }

[Patricio Avalos Aguirre]

Buenos Dias

Hay que tener mucho cuidado con este código, ya que te puede entregar dos tipos de datos, NUMERIC Y CHARACTER



en mi caso yo utilizo asi..

Code: Select all

function p()

   local oDlg, nValor := 1, oCombo

   DEFINE DIALOG oDlg

   @ 1, 2 COMBOBOX oCombo VAR nValor ITEMS { "Hombre", "Mujer" }

   @ 2, 10 BUTTON "Valor" ACTION MsgInfo( oCombo:VarGet() )

   ACTIVATE DIALOG oDlg CENTERED

return nil