Latest Contributions by SuzanneAngelo

‎05-28-2013

I had a similar problem; the EditForm had mode=2 and would not reopen. This solution worked for me. My suspicion is that the open EDITFORM is not completely unloaded and still shows mode = 2 (Editing an existing feature ). One work around that shows some promise (although perhaps not the most elegant) is to enable the TIMER and check for the EDITFORMS state being back to -1 (Not currently open ). I have confirmed it does work but haven't worked out all the details of saving the current data before closing the form. If there is a better way I am open to it, as I think this is perhaps not the best way. My case was slightly different in that I wanted to open the EditForm from a secondary form in the Layer's .apl file. (I have a shapefile instead of an AXF). It was very annoying that the EditForm appeared to my eyes to be closed already; only that other form was visibly open. And still Layer.Forms("EditForm").Mode=2. (Sigh...) Here is how I implemented kganz's solution... In the Layer's .vbs code, I added the following lines after selecting the next feature to be edited (the EditForm having been previously "closed"): Application.Timer.Interval = 100 'milliseconds Application.Timer.Enabled = True Then in my Applet code I attached the following code to the Application.OnTimer Event. Public Sub EditSelectedPoint() 'When the OnTimer event is fired, then Edit the selected feature. Dim objSelectionLayer Application.Timer.Enabled = False Set objSelectionLayer = Map.SelectionLayer If Not(objSelectionLayer Is Nothing) Then objSelectionLayer.Edit Map.SelectionBookmark End If End Sub So far it seems to be working!

‎05-16-2013

I had this same problem today. Apparently ArcPad is expecting a Layer object, not just a string. So, for the example above... Map.Select Map.Layers("Buildings"), Application.UserProperties("bdgbookmark") (Assuming that that UserProperty is of type Long.)

‎05-15-2013

Is there a way to determine which control on a form currently has the focus? I see how to SetFocus for a particular control, but there does not appear to be either a HasFocus or an IsActive property for the form controls. My form has two controls that hold the same information: an Edit control where the user to type anything and a ListBox for selecting from a series of common defaults. Whenever that information changes (when the change is complete, not halfway through the typed word), I want my vbscript code to update the other control to match, and update various other controls and related DBF tables. For the listbox I use the OnSelChange event, and I had been trying to use the OnKillFocus event for the textbox. However, if they user types something new in the Edit control and then clicks on a value in the ListBox, the OnKillFocus event (of course) runs before OnSelChange. Say user types "Drain#X" in the Edit control, then clicks on "Drain#Y" in the ListBox... The user would expect for "Drain#Y" to be the current value but "Drain#X" is used instead. In fact, "Drain#X" (the typed value) stays in the Edit control; the ListBox control now has the focus but no value is currently selected (waving the mouse up and down as I test this on my desktop causes the list to scroll). If I could check within the OnKillFocus event's code whether the listbox is the new active control, then I could probably stop the update process before it completes. But I don't see a way of doing this. I suppose I will have to use a work around, adding OnSetFocus events to all form controls except the listbox, with code to check whether the textbox value differs from the listbox. But that will be rather tedious and I'm hoping for a simpler solution. Any ideas?

Online Status	Offline
Date Last Visited	‎11-11-2020 02:24 AM

My Ideas

Latest Contributions by SuzanneAngelo

Re: Edit Form Refresh on new selection

Re: ArcPad Select Method

after OnKillFocus event, determine which control has the focus