Как изменить даные поля в таблице?

0 голосов
спросил 05 Июнь, 11 от LastSoldier (160 баллов) в категории Программные продукты Esri
Всем привет! Я только начинающий программист, так что не судите строго.
У мня есть слой Goroda, в нем поля Name, F_id и  Population.
Если таблица с именем Tabl в которой существует поле F_id_t  связанное с слоем Goroda через поле F_id, так же в таблице существует еще  несколько полей P_sr и P_max. Мне надо сделать форму на которую выводятся все имена городов, так же на форме будут еще два текстовых поля которые связаны с P_sr и P_max, мне надо сделать так, чтобы введя в эти поля значения, они  поменялись  и сохранились  в моей таблице.

2 Ответы

0 голосов
ответил 05 Июнь, 11 от LastSoldier (160 баллов)
Dim pEdit As IWorkspaceEdit

Do Until pFeat Is Nothing
    If pFeat.Value(pFeat.Fields.FindField("Name")) = ListBox1.Value Then
       
        x = pFeat.Value(pFeat.Fields.FindField("F_ID_g"))
 
    Exit Do
   End If
Set pFeat = pCur.NextFeature
Loop


Set pStandaloneTable = pStandaloneTableCollection.StandaloneTable(0)

Set pCur1 = pStandaloneTable.Table.Search(Nothing, False)
Set pRow = pCur1.NextRow

pEdit.StartEditing False
pEdit.StartEditOperation

Do Until pRow Is Nothing


    If pRow.Value(pRow.Fields.FindField("F_id")) = x Then

        y = pRow.Value(pRow.Fields.FindField("P_sr"))
        pRow.Value(pRow.Fields.FindField("P_sr")) = Text_P_sr.Text
      Exit Do
   End If
Set pRow = pCur1.NextRow
Loop

pEdit.StopEditOperation
pEdit.StopEditing True

 В этом месте "pRow.Value(pRow.Fields.FindField("P_sr")) = Text_P_sr.Text" я пытаюсь заменить поле в таблиц на то что пишу в текстовом поле.

у меня проблема с этим
 pEdit.StartEditing False
pEdit.StartEditOperation
не могу включить редактирование
0 голосов
ответил 16 Июнь, 11 от TDenis (42,620 баллов)
Значение pEdit нигде не устанавливается, там Nothing/null/nil.
Добро пожаловать на сайт Вопросов и Ответов, где вы можете задавать вопросы по GIS тематике и получать ответы от других членов сообщества.
...