Porque no trabaja la clausula valid de un Get el c贸digo es el siguiente:
local l_oGet
private p_cArti :=space(14)
private p_pDlg
DEFINE DIALOG p_oDlg RESOURCE 'DCON_PRE1'
REDEFINE GET l_oGet VAR p_cArti ID 101 OF p_oDlg PICTURE '@!@k' VALID(Chk_Pre1())
ACTIVATE DIALOG p_oDlg CENTER
Close Databases
Return Nil
Static Function Chk_Pre1()
? '1'
Return(.t.)
Guillermo Guevara C.
Clp5.2e FW2.3b Blk3.3
Guillermo,
Necesitas tener un control m谩s en el di谩logo para que se produzca p茅rdida de foco hacia ese otro control
Disculpa mi ignorancia.
Ok de acuerdo con tu recomendaci贸n, entonces voy a programar un di谩logo definiendo controles que no ucupo, 驴es una limitante de FW 贸 que sucede?, en nuestro viejo Clipper no teniamos estas limit谩ntes.
Ejemplo espec铆fico de este caso, estoy tratando de construir un verificador de precios para que el usuario utilice un scanner (Lector de c贸digo de barras) lea el GET (unico control en este di谩logo) y a trav茅s de la clausula VALID con otro di谩logo despliegue el precio de venta por unos segundos y que regrese al GET original listo para otra lectura.
Guillermo Guevara C.
Guillermo:
No, no hay esa limitante, prueba cambiando la l铆nea as铆:
REDEFINE GET l_oGet VAR p_cArti ID 101 OF p_oDlg PICTURE '@!@k' VALID Chk_Pre1()
Salaudos
Guillermo,
Usa un GET y un bot贸n "Aceptar"
Armando:
Tu sugerencia es que quite un par de parentesis de la clausula VALID, ya lo hice, pero no funcion贸, sigue igual, el programa est谩 atascado en el GET.
Antonio:
Imaginate en una tienda un verificador de precios donde comunmente, el cliente solo acerca el producto al lector de c贸digo de barras y en la pantalla se muestra el precio del art铆culo.
Con tu sugerencia de definir un bot贸n, imaginate tendr铆a que ponerle un rat贸n con un "Mousepad" o un teclado con una base (Mesa 贸 algo as铆) lo cual resultar铆a, totalmente inoperante.
Posiblemente estoy buscando la soluci贸n al problema incorrectamente, si algui茅n en el foro tiene alguna idea para solucionar est谩 cosa tan simple por favor transmitanmela.
Realmente este tipo de problemas son los que me han detenido en la decisi贸n de comprar las herramientas requeridas para cambiar definitivamente a este ambiente.
Saludos
Guillermo
Guillermo:
Podr铆as especificar un poco m谩s cual es el problema ?, cuando dices se queda atascado significa que no ves el resultado del c贸digo ?:
? '1'
Si entiendo bien, la soluci贸n es que utilices un SAY en el mismo dialogo, despues del GET, para mostrar el precio de venta, as铆 no tendr铆as que obligar al usuario a usar ningun bot贸n.
Saludos
Efectivamente lo que requiero es que se muestre el
? '1'
Que es la prueba de que funcion贸 la clausula VALID en el GET
Ya hab铆a comprobado que poniendo el SAY en mismo control se hace la perdida de foco que me indicaba Antonio.
Sin embargo estoy intrigado porque algo que funciona tan bi茅n en nuestro viejo Clipper no puede funcionar en FW, cuando menos hasta ahora.
Agradezco tus atenciones
Guillermo
Guillermo,
>
Sin embargo estoy intrigado porque algo que funciona tan bi茅n en nuestro viejo Clipper no puede funcionar en FW, cuando menos hasta ahora.
>
Windows es un entorno muy distinto en su funcionamiento al antiguo MsDos.
FiveWin intenta en la medida de lo posible proporcionar comportamientos muy similares, pero en ocasiones hay que seguir las reglas que impone Windows
Muchas Gracias por todos los consejos y tu apoyo, estoy de acuerdo hay que cambiar la forma estructurada de pensar, a pensar en funci贸n de la programaci贸n orientada a objetos.
Lo considerar茅 para mi verificador de precios
Guillermo
YO HE HECHO ESO CON CODIGO DE BARRAS Y SOLO PONGO UN BOTON "SALIR", NO ES PARA QUE EL USUARIO LE DE CON UN MOUSE SALIR SINO COMO DICE ANTONIO PARA QUE HAYA AL MENOS 2 CONTROLES, SI TE DA PIEDRA PONERLO PONLO HIDE Y YA
