Доброе утро всем. Подскажите где ошибка? Почему m_oldRecNo=0 при первом запуске?
Я, щелкнув по первой строке хочу получить ее номер, далее щелкнув по второй строке получить ее номер, не испортив предыдущий номер. И наоборот тоже.

If Val(this.parent.grid1.Tag) <> RecNo('spprice') Then
m_oldRecNo = VAL(this.parent.grid1.Tag)
m_curRecNo = RecNo('spprice')
this.parent.grid1.Tag = RecNo('spprice')

locate for recno('spprice')=m_oldRecNo
this.parent.text3.value=spprice.presc_id

locate for recno('spprice')=m_curRecNo
this.parent.text4.value=spprice.presc_id
endif

как же сделать чтобы this.parent.grid1.Tag было не равно =''?

Можно вот так this.parent.grid1.Tag=str(Recno()) ?

Нет, это я чушь какую-то написала...Не понимаю что-то.

Dima TНадеждаМкак же сделать чтобы this.parent.grid1.Tag было не равно =''?
прописать в дизайнере форм в свойстве Tag чего-нибудь.

Но проще в коде проверку сделать, чтобы все в одном месте было. Так например:


Попробовала сделать вот так:


If Val(this.parent.grid1.Tag) <> RecNo('spprice') Then
IF this.parent.grid1.Tag=''
m_oldRecNo = max(1, VAL(this.parent.grid1.Tag))
ELSE
m_oldRecNo = VAL(this.parent.grid1.Tag)
ENDIF

m_curRecNo = RecNo('spprice')
this.parent.grid1.Tag = STR(RecNo('spprice'))

endif

если я при первом запуске выделяю сначала первую строку, а затем вторую, то все нормально, а если сначала вторую, а затем первую, то в m_oldRecNo получается номер первой строки.