Thanks John, Can’t wait to get started on that.
Regards, Rudy Mortier Two Way Communications bvba > On 10 Dec 2019, at 14:57, John DeSoi via 4D_Tech <[email protected]> wrote: > > Hi Rudy, > > Here is some code to get you started. It uses a table with a single indexed > boolean field to quickly generate any size selection you need to manage > scrolling. I used this technique with list boxes before it was possible to > use collections to manage scrolling. > > > C_LONGINT($1;$count) > > C_LONGINT($new) > > $count:=$1 > > $new:=Records in table([LB_Selection])-$count > If ($new<0) > $new:=Abs($new) > ARRAY BOOLEAN($aIndex;$new) > If (Records in selection([LB_Selection])>0) > REDUCE SELECTION([LB_Selection];0) > End if > ARRAY TO SELECTION($aIndex;[LB_Selection]Index) > End if > > SCAN INDEX([LB_Selection]Index;$count;>) > GOTO SELECTED RECORD([LB_Selection];1) > > >> On Dec 10, 2019, at 7:44 AM, Two Way Communications via 4D_Tech >> <[email protected]> wrote: >> >> >> Hi John, >> >> That is a very clever solution! >> >> Thanks, I wouldn’t have thought of that! >> > > ********************************************************************** > 4D Internet Users Group (4D iNUG) > Archive: http://lists.4d.com/archives.html > Options: https://lists.4d.com/mailman/options/4d_tech > Unsub: mailto:[email protected] > ********************************************************************** ********************************************************************** 4D Internet Users Group (4D iNUG) Archive: http://lists.4d.com/archives.html Options: https://lists.4d.com/mailman/options/4d_tech Unsub: mailto:[email protected] **********************************************************************
