DataGrid question...

[Pi Digital]

Wow, David. Not convoluted at all :) so much easier than data grid. I’m not sure this is what Curry was thinking of. What do you think he was eluding to. We’ve ‘known’ this for years now apparently. 

Sean Cole
Pi Digital


> On 30 Mar 2020, at 14:13, David Epstein via use-livecode <use-livecode at lists.runrev.com> wrote:
> 
> This is more or less Jacqueline Gay’s suggestion, but with a couple of wrinkles.  You do need to adjust for the horizontal scroll of the field (I’m not sure about borders or margin).  And if I am not mistaken sometimes “the tabStops” will not have an entry for each tab, if the column width stays constant.
> My approach is to keep a global called gColGuide, which gets reloaded when column widths change.  It has one line per column, with leftEdge,0,rightEdge,0 in each line.
> The function used to load gColGuide is shown below.
> 
> put word 1 of the clickLoc into x
> put word 2 of the clickLine into L — line number
> put the hScroll of fld “table” into hs
> 
> put colGuide() into gColGuide
> 
> function mCol x,hs — returns column number for horizontal pixel x, consulting gColGuide.  hs is the field’s hScroll.
>  global gColGuide
>  add hs to x
>  put 1 into c
>  repeat for each line k in gColGuide
>    if x > item 1 of k and x < item 3 of k then return c
>    add 1 to c
>  end repeat
>  return empty
> end mCol-- Any need to adjust for borders and margins?
> 
> function colGuide — used to load gColGuide with one line per column; each line has left,0,right,0
>  set itemDelimiter to tab
>  put the number of items in fld "headers" of into cz
>  set itemDelimiter to comma
>  get the tabStops of fld “table”
>  put "0," before it
>  put the left of fld “table” into fL
>  repeat with n = 1 to min(cz,(-1 + the number of items in it)) -- so that colGuide will only cover the used columns.
>    put fL+8 + item n of it,0,fL+8 + item n+1 of it,0 & return after hold
>  end repeat
>  if cz > n then
>    put item 3 of line -1 of hold - item 1 of line -1 of hold into w
>    repeat with m = n+1 to cz
>      get item 3 of line -1 of hold
>      put it,0,w + it,0 & return after hold
>    end repeat
>  end if
>  put fL into item 1 of hold
>  return hold
> end colGuide
> 
> David Epstein
> 
> _______________________________________________
> use-livecode mailing list
> use-livecode at lists.runrev.com
> Please visit this url to subscribe, unsubscribe and manage your subscription preferences:
> http://lists.runrev.com/mailman/listinfo/use-livecode