Jocely,
Got it now. This is v16 R4. Maybe the property list is different now.
All I needed to do was check the focusable checkbox and as long as the
single-click edit check box is checked it works.
Thanks again.
John
> On Nov 23, 2017, at 11:21 AM, John Baughman <john...@hawaii.rr.com> wrote:
>
> Jocelyn,
>
> Thanks, however, after checking Focusable I can’t find a “cells column”
> or anything that sys “Enterable". Are we still in the Property list?
>
> John
>
>> On Nov 23, 2017, at 10:57 AM, CostCon NZ via 4D_Tech <4d_tech@lists.4d.com
>> <mailto:4d_tech@lists.4d.com>> wrote:
>>
>> "The docs says that in order for a list box cell to be enterable the cell’s
>> column must have been set to Enterable. How do you do that?"
>>
>>
>>
>> On the list box properties ensure in the Entry theme that the focusable
>> check box is ticked. Then you can see and then click enterable checkbox on
>> the cells column.
>>
>>
>>
>> Hope this helps
>>
>>
>>
>> Regards
>>
>>
>>
>> Jocelyn
>>
>> On Fri, Nov 24, 2017 at 8:43 AM, John Baughman via 4D_Tech <
>> 4d_tech@lists.4d.com <mailto:4d_tech@lists.4d.com>> wrote:
>>
>>> Trying to make a list box editable without any success.
>>>
>>> On the form the array based list box contains 1 column. The list box has
>>> the single-click edit property checked. The llist box method contains…
>>>
>>>
>>> Case of
>>> : (Form event=On Before Data Entry)
>>> $columnPtr:=LISTBOX GET CELL POSITION(albTimesheets;$col;$row)
>>> If ($col=1)
>>> $0:=-1
>>> End if
>>>
>>> End case
>>>
>>> On load I am adding a bunch of columns like this…
>>>
>>> For ($k;1;Day of($lastDayOfMonth))
>>> $Last:=LISTBOX Get number of columns(albTimesheets)+1
>>> $arrayPtr:=Get pointer("aDay"+String($K))-
>>> LISTBOX INSERT COLUMN(albTimesheets;$Last;"
>>> Day"+String($k);$arrayPtr->;"Day"+String($k)+"Header";$nillPtr->)
>>> LISTBOX SET COLUMN WIDTH(*;"Day"+String($k);$colWidth)
>>> OBJECT SET FORMAT(*;"Day"+String($k);"###,###.00;;")
>>> OBJECT SET FONT SIZE(*;"Day"+String($k);11)
>>> OBJECT SET HORIZONTAL ALIGNMENT(*;"Day"+String($k);Align center)
>>> OBJECT SET TITLE(*;"Day"+String($k)+"Header";Padbeforev_Jut
>>> (String($k);0;1))
>>>
>>> End for
>>>
>>> When I click column 1 the row is selected, as expected. When I click a
>>> column cell, however, nothing happens. the currently selected row remains
>>> selected and the cell does not go into editing mode.
>>>
>>> Do I need to do something in the On Before Data Entry event to get into
>>> the cell?
>>>
>>> The docs says that in order for a list box cell to be enterable the cell’s
>>> column must have been set to Enterable. How do you do that? I tried adding
>>> an Object Set Enterable to the for loop adding the columns…
>>>
>>> OBJECT SET ENTERABLE(*;"Day"+String($k);True)
>>>
>>> Any help is appreciated.
>>>
>>> John
>>>
>>> John Baughman
>>> Kailua, Hawaii
>>> (808) 262-0328
>>> john...@hawaii.rr.com <mailto:john...@hawaii.rr.com>
>>>
>>>
>>>
>>>
>>>
>>> **********************************************************************
>>> 4D Internet Users Group (4D iNUG)
>>> FAQ: http://lists.4d.com/faqnug.html
>>> Archive: http://lists.4d.com/archives.html
>>> Options: http://lists.4d.com/mailman/options/4d_tech
>>> Unsub: mailto:4d_tech-unsubscr...@lists.4d.com
>>> **********************************************************************
>> **********************************************************************
>> 4D Internet Users Group (4D iNUG)
>> FAQ: http://lists.4d.com/faqnug.html <http://lists.4d.com/faqnug.html>
>> Archive: http://lists.4d.com/archives.html
>> <http://lists.4d.com/archives.html>
>> Options: http://lists.4d.com/mailman/options/4d_tech
>> <http://lists.4d.com/mailman/options/4d_tech>
>> Unsub: mailto:4d_tech-unsubscr...@lists.4d.com
>> <mailto:4d_tech-unsubscr...@lists.4d.com>
>> **********************************************************************
>
> John Baughman
> Kailua, Hawaii
> (808) 262-0328
> john...@hawaii.rr.com <mailto:john...@hawaii.rr.com>
>
>
>
>
>
John Baughman
Kailua, Hawaii
(808) 262-0328
john...@hawaii.rr.com
**********************************************************************
4D Internet Users Group (4D iNUG)
FAQ: http://lists.4d.com/faqnug.html
Archive: http://lists.4d.com/archives.html
Options: http://lists.4d.com/mailman/options/4d_tech
Unsub: mailto:4d_tech-unsubscr...@lists.4d.com
**********************************************************************
