Can you give in a sample code?
I am using either of the ComboSearchBox, ComboBoxAnywhereSearch, HMG_aChoice according to the customer's requirements.
Moderator: Rathinagiri
Tengo un Grid donde voy anotando los servicios que realizo, y ha varia columna que me gustaria
que al escribir el nombre del cliente (que tengo en una array {cod, nombre} me lo fuera mostrando.
*-----------------------------------------------------------------------------------------------------------------------------------------------------
I have a Grid where I go noting down the services I do, and I have a column that I would like
to write the name of the client (that I have in an array {cod, name}, showing it to me.
Code: Select all
AbrirTablas('CuentaOn')
CuentaOn->(DBGotop())
aCuentas := {}
WHILE ! EOF()
IF CUE_SUBCUE > 0
aHash := hash()
aHash ["Cuenta" ] := CUE_CUENTA + StrZero(CUE_SUBCUE,5)
aHash ["Descri" ] := CUE_DESCRI
AADD(aCuentas, aHash)
EndIf
CuentaOn->(DBSkip())
ENDDO
CerrarTablas ('CuentaOn')Code: Select all
@ 100 , 10 GRID Grid_TL ;
WIDTH 1100 ;
HEIGHT 370 ;
HEADERS { 'Cuenta' , 'D/H' , 'Formula' , 'Concepto' , 'Documento' } ;
JUSTIFY { GRID_JTFY_LEFT , GRID_JTFY_CENTER , GRID_JTFY_LEFT , GRID_JTFY_LEFT , GRID_JTFY_LEFT } ;
WIDTHS { 140 , 40 , 300 , 300 , 250 } ;
COLUMNCONTROLS { {'ComboSearchGrid',aCuenta} , , , , };
Value 1;
EDIT ;
CELLNAVIGATION;
ON INPLACEEDITEVENT ProcGridInplaceEditEvent()
// ON KEY ProcOnKeyEvent();
// ON CLICK ProcOnClickEvent()
Code: Select all
SetProperty( cParentName, cTxBName , "VALUE", cListItem )
SetProperty( cParentName, "tBanDes" , "VALUE", cListBanDes )
SetProperty( cParentName, "NEMP" , "VALUE", cListBanEmp )
SetProperty( cParentName, "tBanCue" , "VALUE", cListBanCue )