topic Re: EDITFORM in Edit mode. in ArcPad Questions

EDITFORM in Edit mode.

ChingizEsenaliev — Mon, 03 Oct 2011 06:08:54 GMT

There's shp with a lot of points. GPS puts the point and I need to open the attributes of the closest point in edit mode. how to implement it?

thanks
Chingiz

Re: EDITFORM in Edit mode.

RobChouinard — Sun, 12 Dec 2021 00:10:11 GMT

This should get you started.

Dim objRS, Layer, Bookmark, X, Y, MaxDistance
Set Layer = Map.Layers("LayerName to search for")
MaxDistance = "1000" ' Distance is in map units

' Select the nearest point
X = GPS.X
Y = GPS.Y
Set objRS = Layer.Records
Bookmark = objRS.FindNearestXY(X, Y, MaxDistance)
Call Map.Select(Layer, Bookmark)

' Show the attributes of the selected point
If Bookmark <> 0 Then
     If Layer.CanEdit Then
          Layer.Editable = True
          Call Application.ExecuteCommand("featureproperties")
     End If
Else
     Call MsgBox("Nothing Found")
End If

Re: EDITFORM in Edit mode.

HatibuSemkieti — Wed, 05 Oct 2011 11:20:46 GMT

There's shp with a lot of points. GPS puts the point and I need to open the attributes of the closest point in edit mode. how to implement it?

thanks
Chingiz

I thin you should export it as shape file by Right click to your GPS coords file on left side in the table of contents then go to DATA then EXPORT. After exporting it go to that shapefile then open its attribute table you can see your attribute.

OR

if your want to see the coords of that file, you should have XTOOLS extension

I think it is clear

EDITFORM in Edit mode.

ChingizEsenaliev — Thu, 06 Oct 2011 04:17:56 GMT

Thanks for the reply and detailed response.

It works )