topic-41168

goosfancito

Posts: 1956

Joined: Fri Oct 07, 2005 07:08 PM

gets.. eval... lostfocus..
Posted: Tue Dec 07, 2021 11:18 AM

Hola.

Tengo un array de oGets que necesito acumular los valores pero solo de ciertos ogets cuando pierde el foco:

aeval(::aGets, { |o, x| iif(x in {1,4,6}, ::sumar(),)})

ahora no puedo usar mas el "in" en harbourd...

Alguna ayuda?
gracias.

FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/

karinha

Posts: 8515

Joined: Tue Dec 20, 2005 07:36 PM

Re: gets.. eval... lostfocus..
Posted: Tue Dec 07, 2021 01:01 PM

"in" ???

Un ejemplo simples, para testes, hay?

Regards, saludos.

João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341

carlos vargas

Posts: 1789

Joined: Tue Oct 11, 2005 05:01 PM

Re: gets.. eval... lostfocus..
Posted: Tue Dec 07, 2021 01:15 PM

No recuerdo si in es aceptado en harbour,
talvez agregando la libreria xhb y hbcompat.ch

Salu2

Carlos Vargas

Desde Managua, Nicaragua (CA)

goosfancito

Posts: 1956

Joined: Fri Oct 07, 2005 07:08 PM

Re: gets.. eval... lostfocus..
Posted: Tue Dec 07, 2021 08:48 PM

termino de intentarlo pero no da.

Karina: suponte que tenes un array con estos valores
1, 4, 6, 7

y vos queres saber si un numero "x" existe en ese array, en xharbor yo hacia esto:

Code (fw): Select all Collapse

if ( x in {1, 4, 6, 7 })
    msginfo("existe")
endif

pero ahora veo que en harbour eso no puedo hacerlo.

FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/

xmanuel

Posts: 817

Joined: Sun Jun 15, 2008 07:47 PM

Re: gets.. eval... lostfocus..
Posted: Tue Dec 07, 2021 09:24 PM

Usa hb_ascan() si existe te devuelve la posicion si no 0

if hb_ascan(...) > 0
msg( "existe" )

______________________________________________________________________________

Sevilla - Andalucía

FiveTech Support Forums

Continue the discussion