Page 1 of 1

xbrowse y multiselección

PostPosted: Wed Oct 25, 2017 8:52 pm
by horacio
Colegas, querría saber cuales son las variables de clase ( si existen ) que pintan los renglones seleccionados y también como puedo implementar las teclas de repaginar para seleccionar. Muchísimas gracias.

Saludos

Re: xbrowse y multiselección

PostPosted: Wed Oct 25, 2017 9:30 pm
by Rick Lipkin
Horacio

Consider this code .. first you have to use this MarqueeStyle :
Code: Select all  Expand view

 oLbx:nMarqueeStyle := MARQSTYLE_HIGHLROWMS  // multi-row select
 


Then to process the Hi-lighted rows you can use a For\Next loop and do whatever :
Code: Select all  Expand view


//----------------------------
Static Func _TranAll( oLbx )

Local aCols,i

aCols := oLbx:aSelected

For i = 1 to Len(aCols)

   oLbx:BookMark := aCols[i]
   _DoWhatEver()

Next

Return(nil)
 


Rick Lipkin