listbox

[angelcv]

@ 3, 1 LISTBOX alm_ListBox ;
FIELDS almacen->descrip,; // Campos que contendr 
transform(almacen->preveneur,"99,999.99"),; // el TBrowse.
transform(almacen->preproeur,"99,999.99"),;
transform(almacen->preneteur,"99,999.99"),;
substr(almacen->nomprov,1,20),;
transform(almacen->stoact,"99999"),;
transform(almacen->stomin,"99999"),;
transform(almacen->stomax,"99999"),;
transform(almacen->consumo,"9,999,999");
FIELDSIZES 250,50,50,50,90,50,50,50,50 ; // Dimensiones de c/campo (en pixeles)
HEADERS "DESCRIPCION", "PVP ", "P.EMPRESA","P.NETO COMPRA","NOM.PROV.","STOACT","STOCKMIN","STOCKMAX","CONSUMO";
SIZE 380, 150; // Tama¤o del TBrowse
ON LEFT DBLCLICK alm_bajoBuscar(alm_diaBuscar,almacen->descrip); // Al doble click se editar  el registro
OF alm_diaBuscar

Dado este codigo cuando haces doble click entonces se ejecuta alm_bajoBuscar pero COMO HACER PARA QUE SE EJECUTE HACIENDO TAMBIEN ENTER

GRACIAS

[Willi Quintana]

Hola., Añade la linea de color


ON LEFT DBLCLICK alm_bajoBuscar(alm_diaBuscar,almacen->descrip); // Al doble click se editar el registro
OF alm_diaBuscar


alm_ListBox:bKeyDown := { |nKey,nFlags|If(nKey=13,alm_bajoBuscar(alm_diaBuscar,almacen->descrip) }


Salu2

[Antonio Linares]

Angel,

Bienvenido a los foros!