listbox

Post Reply
angelcv
Posts: 2
Joined: Tue Jul 08, 2008 1:58 pm

listbox

Post by 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
User avatar
Willi Quintana
Posts: 859
Joined: Sun Oct 09, 2005 10:41 pm
Location: Cusco - Perú
Contact:

Post by 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
User avatar
Antonio Linares
Site Admin
Posts: 37481
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain
Contact:

Post by Antonio Linares »

Angel,

Bienvenido a los foros! :-)
regards, saludos

Antonio Linares
www.fivetechsoft.com
Post Reply