FiveTech Software tech support forums

Antonio: necesito en función ff() (de este código que te mando) tener la posición elegida del vector en el combobox
o pasar la opción elegida como parámetro a esa función
de que manera lo hago ? o como debo trabajarlo?
GRACIAS
SLDOS

LOCAL aValor:={'uno','dos','tres'}
LOCAL cValor:='uno'
oGet1 := TComboBox():New( 58 , 150 , , , oDlg , aValor , 'oGet1' , cValor , )
@ 150, 80 BUTTON "Imprimdo Recibo" OF oDlg SIZE 200, 40 ACTION document.location = "lupaMENUcliente.exe?valido:"
ATail( oDlg:aControls ):cAction += '+ "' + fff() + ':"'

ACTIVATE DIALOG oDlg NOWAIT

return nil

function fff
*===========
//ACA NECESITO EL VALOR ELEGIDO PARA GRAVARLO EN UN ARCHIVO
return (NIL)

Silvina,

ATail( oDlg:aControls ):cAction += '+ "' + oGet1.value + ':"'

Revisa FiveWeb\samples\testcomb.prg

esa instrucción la copié tal cual y me da error de sintaxis.
igual lo que necesito es pasarlo a una función ... será posible?
gracias

perdón, sí pude ejecutar y ahí me dio error.
probe de esta forma que es lo que necesito y no funciona...

oGet1 := TComboBox():New( 58 , 150 , , , oDlg , aValor , 'oGet1' , cValor , )

@ 150, 80 BUTTON "Imprimdo Recibo" OF oDlg SIZE 200, 40 ACTION document.location = "lupaMENUcliente.exe?valido:"+ ;
document.getElementById( "oGet1" ).value + ":"

ATail( oDlg:aControls ):cAction += '+ "' + ff(oGet1:value) + ':"'


ACTIVATE DIALOG oDlg NOWAIT



Else


endif

return nil


function ff (xx)
*===========

return (xx)

lo solucione asi , de esta manera puedo ejecutar la función mandadole como parámetro el elemento elegido
ATail( oDlg:aControls ):cAction += '+ "' + ff('+"+oGet1.value+"') + ':"'

donde en
function ff (xx)
buscar xx
grabar
return ()

muy bien