Как сделать подкачку записи в Browse
Модератор: Andrew™
Правила форума
При написании вопроса или обсуждении проблемы, не забывайте указывать версию Clarion и MAV который Вы используете.
А так же пользуйтесь спец. тегами при вставке исходников!!!
При написании вопроса или обсуждении проблемы, не забывайте указывать версию Clarion и MAV который Вы используете.
А так же пользуйтесь спец. тегами при вставке исходников!!!
Как сделать подкачку записи в Browse
Есть кнопка, скажем [Добавление с копированием]. Как обновить Browse без подкачки всего списка, типа:
GlobalRequest = InsertRecord
MAV_TAKEPRINTERS::Update(1, ?NameAccountPeriod:String{PROP:Text})
IF GlobalResponse = RequestCompleted
!Вот тут что-то надо написать...
ELSE
BRW1:Browse.NewSelection
END
SELECT(?List)
CYCLE
GlobalRequest = InsertRecord
MAV_TAKEPRINTERS::Update(1, ?NameAccountPeriod:String{PROP:Text})
IF GlobalResponse = RequestCompleted
!Вот тут что-то надо написать...
ELSE
BRW1:Browse.NewSelection
END
SELECT(?List)
CYCLE
-
- ✯ Ветеран ✯
- Сообщения: 5006
- Зарегистрирован: 28 Май 2009, 15:54
- Откуда: Москва
- Благодарил (а): 7 раз
- Поблагодарили: 21 раз
Re: Как сделать подкачку записи в Browse
Добавить в очередь бровза только одну запись?
We are hard at work… for you.
Re: Как сделать подкачку записи в Browse
Да. Тут которая добавилась в форме.kreator писал(а):Добавить в очередь бровза только одну запись?
-
- ✯ Ветеран ✯
- Сообщения: 5006
- Зарегистрирован: 28 Май 2009, 15:54
- Откуда: Москва
- Благодарил (а): 7 раз
- Поблагодарили: 21 раз
Re: Как сделать подкачку записи в Browse
Можно попробовать руками, типа:
BRW1.Q.FIL:ID = поле ID добавленной записи
BRW1.Q.FIL:Name = поле Name добавленной записи
add(BRW1.Q)
не забыть потом display(?Browse:1)
может понадобиться sort(BRW1.Q,......)
Вообще, криво это и возникает вопрос "А зачем?".
BRW1.Q.FIL:ID = поле ID добавленной записи
BRW1.Q.FIL:Name = поле Name добавленной записи
add(BRW1.Q)
не забыть потом display(?Browse:1)
может понадобиться sort(BRW1.Q,......)
Вообще, криво это и возникает вопрос "А зачем?".
We are hard at work… for you.
- Игорь Столяров
- Ветеран движения
- Сообщения: 7419
- Зарегистрирован: 07 Июль 2005, 10:19
- Откуда: г. Ростов-на-ДоМу
- Благодарил (а): 16 раз
- Поблагодарили: 50 раз
Re: Как сделать подкачку записи в Browse
А "весь список" и не обновляется ... Обновляется только отобращение записей в видимой части списка.Леонид писал(а):Есть кнопка, скажем [Добавление с копированием]. Как обновить Browse без подкачки всего списка
Ну если конечно для BROWSE не выбран тип FILE ...
За теми кто отстал - не возвращаться. (С) Кодекс
Re: Как сделать подкачку записи в Browse
Да. кривовато. Самое интересное: буфер добавленной записи есть и повторно его тянуть с сервера - как-то не того, ну или код писать ручной добавления в очередь...kreator писал(а):Можно попробовать руками, типа:
BRW1.Q.FIL:ID = поле ID добавленной записи
BRW1.Q.FIL:Name = поле Name добавленной записи
add(BRW1.Q)
не забыть потом display(?Browse:1)
может понадобиться sort(BRW1.Q,......)
Вообще, криво это и возникает вопрос "А зачем?".
Методов то в INC-файле много, ряд по смыслу попробовал - не катят. Хотя может неправильно их вызываю...
Re: Как сделать подкачку записи в Browse
В MAV я использую полную загрузку (не постраничную)Игорь Столяров писал(а):А "весь список" и не обновляется ... Обновляется только отобращение записей в видимой части списка.Леонид писал(а):Есть кнопка, скажем [Добавление с копированием]. Как обновить Browse без подкачки всего списка
Ну если конечно для BROWSE не выбран тип FILE ...
-
- ✯ Ветеран ✯
- Сообщения: 5006
- Зарегистрирован: 28 Май 2009, 15:54
- Откуда: Москва
- Благодарил (а): 7 раз
- Поблагодарили: 21 раз
Re: Как сделать подкачку записи в Browse
Я что-то упустил - если MAV, значит есть SQL сервер, значит работа в сети многопользовательская. Лучше, наверное, читать все, в т.ч. и изменения, сделанные другими пользователями.
We are hard at work… for you.
-
- ✯ Ветеран ✯
- Сообщения: 1704
- Зарегистрирован: 25 Март 2009, 21:55
- Благодарил (а): 9 раз
- Поблагодарили: 4 раза
Re: Как сделать подкачку записи в Browse
не совсем ясно, если нужно чтобы запись появилась у пользователя который создал запись, так она и появляется без принудительного обновления(refresh) кнопки, если для всех остальных пользователей то интересно как это все корректно будет отслеживаться, при одновременном добавлении нескольких записей?
BRW1.Q.FIL:ID = поле ID добавленной записи
BRW1.Q.FIL:Name = поле Name добавленной записи
IF MAVINSERT(Таблица) THEN MAVSHOWERROR() END
BRW1:BROWSE.Load
BRW1.Q.FIL:ID = поле ID добавленной записи
BRW1.Q.FIL:Name = поле Name добавленной записи
IF MAVINSERT(Таблица) THEN MAVSHOWERROR() END
BRW1:BROWSE.Load
“Есть всего 2 типа языков: те, на которые все жалуются и те, которыми никто не пользуется.” — Бьерн Страуструп
Re: Как сделать подкачку записи в Browse
Метод Load это опять же Select, т.е. обращение к базе. А свою ситуацию я описал в первом посте. Понятно, что я могу и сам "ручками" написать код обновления списка, просто думал, может есть уже готовые методы. Скажем по смыслу могло бы подойти FillQueue или FillBuffer - но что-то не срабатывают или они для чего-то другого. Help-то совсем скудныйgopstop2007 писал(а):не совсем ясно, если нужно чтобы запись появилась у пользователя который создал запись, так она и появляется без принудительного обновления(refresh) кнопки, если для всех остальных пользователей то интересно как это все корректно будет отслеживаться, при одновременном добавлении нескольких записей?
BRW1.Q.FIL:ID = поле ID добавленной записи
BRW1.Q.FIL:Name = поле Name добавленной записи
IF MAVINSERT(Таблица) THEN MAVSHOWERROR() END
BRW1:BROWSE.Load
-
- ✯ Ветеран ✯
- Сообщения: 1704
- Зарегистрирован: 25 Март 2009, 21:55
- Благодарил (а): 9 раз
- Поблагодарили: 4 раза
Re: Как сделать подкачку записи в Browse
Правда запоздалый ответ, но может кому-то пригодится
BRW1:Browse.FillRecord ! переписали из FILE в пирёмник Browse
BRW1:Browse.FillQueue ! проинициализировали запись Queue Browse
PUT(Queue:Browse)
запись записывается без подзагрузки всего списка
BRW1:Browse.FillRecord ! переписали из FILE в пирёмник Browse
BRW1:Browse.FillQueue ! проинициализировали запись Queue Browse
PUT(Queue:Browse)
запись записывается без подзагрузки всего списка
“Есть всего 2 типа языков: те, на которые все жалуются и те, которыми никто не пользуется.” — Бьерн Страуструп