powered by simpleCommunicator - 2.0.53     © 2025 Programmizd 02
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Суммирование в GRID
10 сообщений из 10, страница 1 из 1
Суммирование в GRID
    #36861544
YurijAnt
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Есть форма с GRID. Необходимо сделать суммирование полей по разным условиям.
Суммирование по кнопке не хотят, хотят чтобы сумма постоянно обновлялась при работе в GRID.
ВОПРОС!!! Как сделать чтобы сумма обновлялась только лишь при изменении или добавлении данных в GRID?
...
Рейтинг: 0 / 0
Суммирование в GRID
    #36861684
igorbik
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
YurijAnt,
1) сделать метод формы по подсчету нужных результатов по гриду, например, Results()
2) включить этот метод в Init формы
3) на контролы в изменяемых полях грида навесить этот же метод (на lostfocus, например)
4) навесить этот метод на событие грида afterrowcolchange
Остальное по вкусу.
...
Рейтинг: 0 / 0
Суммирование в GRID
    #36861891
YurijAnt
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Все решил. Если кому интересно объявил PUBLIC mSum и в свойствах изменяемых полей GRID Column Text в When прописал 'mSum=This.Value', а Valid прописал

IF This.Value!=mSum
SELECT Rozdil_1
SUM Zagsum TO Thisform.pageframe1.page1.sum1.Value
SUM Vart7 TO Thisform.pageframe1.page1.sum2.Value
....
ENDIF
и все суммирует только при изменении данных)))

p.s.
Результат суммы записываю в объект Text Box
...
Рейтинг: 0 / 0
Суммирование в GRID
    #36861923
YurijAnt,
прелестно. а еще указатель записи убегает на последнюю и постоянно его надо возвращать назад. Отличное решение.
...
Рейтинг: 0 / 0
Суммирование в GRID
    #36861926
tanglir
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Щас вас размажут тонким слоем
Вот igorbik дело говорил.
...
Рейтинг: 0 / 0
Суммирование в GRID
    #36861956
Dima T
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
YurijAntВсе решил. Если кому интересно объявил PUBLIC mSum и в свойствах изменяемых полей GRID Column Text в When прописал 'mSum=This.Value', а Valid прописал

IF This.Value!=mSum
SELECT Rozdil_1
SUM Zagsum TO Thisform.pageframe1.page1.sum1.Value
SUM Vart7 TO Thisform.pageframe1.page1.sum2.Value
....
ENDIF
и все суммирует только при изменении данных)))

p.s.
Результат суммы записываю в объект Text Box
А зачем все пересчитывать если итого изменилось на This.Value - mSum ?
...
Рейтинг: 0 / 0
Суммирование в GRID
    #36861989
YurijAnt
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
DimaT Спасибо!!! Замечание ценное.
...
Рейтинг: 0 / 0
Суммирование в GRID
    #36862244
YurijAnt
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
А по поводу убегающей строки при суммировании, то в принципе можно не суммировать, а к готовой сумме прибавлять разницу между mSum и This.Value, так ВАС устроит?
...
Рейтинг: 0 / 0
Суммирование в GRID
    #36862517
Фотография Игорь Горбонос
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
> Автор: YurijAnt
> так ВАС устроит?

И я про вас никому. Езжайте! Да, когда свернете налево, ну вы-то направо, там проезд запрещен, обрыв. Но вам туда можно
(с) классика

Главное что-бы тебе подошло :)

Posted via ActualForum NNTP Server 1.4
...
Рейтинг: 0 / 0
Суммирование в GRID
    #36862718
YurijAnt
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
СПАСИБО)))
...
Рейтинг: 0 / 0
10 сообщений из 10, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Суммирование в GRID
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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