powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Не совпадают типы :((
3 сообщений из 3, страница 1 из 1
Не совпадают типы :((
    #32864259
w3d
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Есть у меня TreeView, в него загоняются названия из таблицы. Не могу сделать поиск в таблице по значениям из дерева. Id_nasosy - Integer(AutoInc). Что делать?

По клику на дереве такое стоит:
LPARAMETERS node
ii=node.index
kk=node.key
tt=node.tag
ll=LEN(kk)-1
nn=RIGHT(kk,ll)
idn=VAL(nn)
node.selected=.T.

USE database!nasosy SHARED
SET ORDER TO id_nasosy
SEEK id_nasosy=INT(idn) IN nasosy---тут ругается на несовпадение типов :((
idn=VAL(id_pump)

REQUERY("qq") ---------------------------------------------- это LocalView
thisform.grid1.Enabled = .T.
thisform.grid1.RecordSourceType = 1
thisform.grid1.RecordSource = "qq"
thisform.grid1.Refresh
...
Рейтинг: 0 / 0
Не совпадают типы :((
    #32864269
Станислав C.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
w3d
SEEK id_nasosy=INT(idn) IN nasosy---тут ругается на несовпадение типов :((

Я, конечно, уже около полугода не лазил в Фокс (юзаю С++), но что-то у меня сомнение в правильности этой команды.
Объясняю: выражение "id_nasosy=INT(idn)" имеет тип boolean (т.е. может быть либо .T., либо .F.) и не может быть преобразовано к типу integer.
Если Вы хотите использовать именно это выражение (id_nasosy=INT(idn)), то замените SEEK на LOCATE (с уменьшением скорости поиска).
Иначе, перепишите команду в виде: SEEK INT(idn) IN nasosy

И будьте аккуратнее при программировании...
...
Рейтинг: 0 / 0
Не совпадают типы :((
    #32864276
w3d
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
посыпаю голову пеплом!
виноват, торможу.
...
Рейтинг: 0 / 0
3 сообщений из 3, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Не совпадают типы :((
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]