 |
|
Модераторы: Poseidon, Snowy, bems, MetalFan |
 
|
|
OnCalcFields нумерация строк 
| Delphist |
|
|||
 Delphist Эксперт  Профиль Группа: Завсегдатай Сообщений: 2145 Регистрация: 3.2.2004 Где: всегда в сети Репутация: 2 Всего: 3 |
У меня в датасете есть поле типа fkCalculated, которое должно выводить номер записи в Grid'e.
Т.е. Field_№ - Field_Value 1.----------Rec1 2.----------Rec2 3.----------Rec3 ... N.----------RecN Номера должны корректно отображаться и при удалении и при добавлении новой записи. т.е. если я удалил 2-ую запись, то должно стать вот так: Field_№ - Field_Value 1.----------Rec1 2.----------Rec2 ... N.----------RecN -------------------- ProcessInfo 1-ая моя программа (аналог spyxx.exe с гораздо большим функц-ом - внедрение dll в адр. простр. процесса, перехват API-функций, разбор приложения на окна мн.др). Когда-то давным-давно использовал это... |
|||
|
||||
Загрузка ...
| drkot |
|
|||
 Ищущий Профиль Группа: Завсегдатай Сообщений: 1042 Регистрация: 5.5.2006 Репутация: 5 Всего: 8 |
ну так в чем проблема?
или тебе надо готовое решение написать? -------------------- Ошибка не становится истиной по причине широкого распространения, как и Истина не становится Ошибкой из-за того, что никто её не видит. |
|||
|
||||
| Delphist |
|
|||
|
Delphist Эксперт Профиль Группа: Завсегдатай Сообщений: 2145 Регистрация: 3.2.2004 Где: всегда в сети Репутация: 2 Всего: 3 |
Так как это реализовать? -------------------- ProcessInfo 1-ая моя программа (аналог spyxx.exe с гораздо большим функц-ом - внедрение dll в адр. простр. процесса, перехват API-функций, разбор приложения на окна мн.др). Когда-то давным-давно использовал это... |
|||
|
||||
| Akella |
|
|||
 Творец Профиль Группа: Модератор Сообщений: 18485 Регистрация: 14.5.2003 Где: Корусант Репутация: 36 Всего: 329 |
Delphist, а RecNo не пробовал??
в том же событии CalcField.asInteger := DataSet1.RecNo; Добавлено @ 17:56  правда, как это будет при фильтрации.... или при сортировке, пробуй, потом расскажешь |
|||
|
||||
| Delphist |
|
|||
|
Delphist Эксперт Профиль Группа: Завсегдатай Сообщений: 2145 Регистрация: 3.2.2004 Где: всегда в сети Репутация: 2 Всего: 3 |
Пробовал. Только при удалении или добавлении записи номер формируется не правильно. -------------------- ProcessInfo 1-ая моя программа (аналог spyxx.exe с гораздо большим функц-ом - внедрение dll в адр. простр. процесса, перехват API-функций, разбор приложения на окна мн.др). Когда-то давным-давно использовал это... |
|||
|
||||
| Grol |
|
|||
 Бывалый Профиль Группа: Участник Сообщений: 159 Регистрация: 5.5.2005 Где: Россия Репутация: нет Всего: нет |
А все таки как правильно нумеровать строки при сортировке?
--------------------
Живи так, как будто тебе предстоит умереть завтра...Учись так, как будто тебе предстоит жить вечно......... |
|||
|
||||
| aktuba |
|
|||
 Смышленный Профиль Группа: Завсегдатай Сообщений: 1915 Регистрация: 24.4.2006 Где: Планета Земля Репутация: 16 Всего: 38 |
Если используешь DataSet, то можно попробовать такой вариант:
1. Создай переменную, например FNum: Integer; 2. в DataSet.OnBeforeRefresh обнуляй созданную переменную (FNum := 0); 3. в DataSet.OnCalcFields делай примерно следующее:
P.S.: предупреждаю сразу - не проверял. привел свои мысли... --------------------  |
|||
|
||||
| Grol |
|
|||
|
Бывалый Профиль Группа: Участник Сообщений: 159 Регистрация: 5.5.2005 Где: Россия Репутация: нет Всего: нет |
aktuba может какой-нить еще вариант есть, т.к. Ваш вариант не действует?
--------------------
Живи так, как будто тебе предстоит умереть завтра...Учись так, как будто тебе предстоит жить вечно......... |
|||
|
||||
| aktuba |
|
|||
|
Смышленный Профиль Группа: Завсегдатай Сообщений: 1915 Регистрация: 24.4.2006 Где: Планета Земля Репутация: 16 Всего: 38 |
А почему не действует? Теоретически должен... Что происходит? Можете демо-код выложить? -------------------- |
|||
|
||||
| Grol |
|
|||
|
Бывалый Профиль Группа: Участник Сообщений: 159 Регистрация: 5.5.2005 Где: Россия Репутация: нет Всего: нет |
DataSet.OnBeforeRefresh - это метод никогда не вызывается, даже при фильтрации...может я не так что то делаю?
--------------------
Живи так, как будто тебе предстоит умереть завтра...Учись так, как будто тебе предстоит жить вечно......... |
|||
|
||||
| aktuba |
|
|||
|
Смышленный Профиль Группа: Завсегдатай Сообщений: 1915 Регистрация: 24.4.2006 Где: Планета Земля Репутация: 16 Всего: 38 |
Сделай тестовый проект и выложи.... -------------------- |
|||
|
||||
| Grol |
|
|||
|
Бывалый Профиль Группа: Участник Сообщений: 159 Регистрация: 5.5.2005 Где: Россия Репутация: нет Всего: нет |
Хорошо...
--------------------
Живи так, как будто тебе предстоит умереть завтра...Учись так, как будто тебе предстоит жить вечно......... |
|||
|
||||
|
|
| Правила форума "Delphi: Общие вопросы" | |
|
|
Запрещается! 1. Публиковать ссылки на вскрытые компоненты 2. Обсуждать взлом компонентов и делиться вскрытыми компонентами
Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader. |
| 0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей) | |
| 0 Пользователей: | |
| « Предыдущая тема | Delphi: Общие вопросы | Следующая тема » |
[ Время генерации скрипта: 0.0847 ] [ Использовано запросов: 22 ] [ GZIP включён ]
Реклама на сайте Информационное спонсорство
|
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |