Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Список: переход на первую запись после удаления текущей - можно ли по другому? / 7 сообщений из 7, страница 1 из 1
05.07.2004, 16:47:37
    #32589857
Benzin
Benzin
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Список: переход на первую запись после удаления текущей - можно ли по другому?
Как сделать(если можно), чтобы при удалении строки в списке, фокус переходил на предыдущую запись, а не на первую. При больших списках(>> высоты экрана) приходится "тягать" туда-сюда прокрутку.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.07.2004, 16:50:35
    #32589864
Владимир Саныч
Владимир СанычПривилегированный пользователь
Модератор форума
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Список: переход на первую запись после удаления текущей - можно ли по другому?
Список - это листбокс? Каким образом в нем удаляются записи?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.07.2004, 18:02:05
    #32590043
Benzin
Benzin
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Список: переход на первую запись после удаления текущей - можно ли по другому?
Список - листбокс, в источнике данных одно из полей логическое. Условие отбора записей - флажок=Истина. При удалении флажок сбрасывается, список обновляется, запись из списка пропадает. Т.е. удаления как такового, собственно, не происходит.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.07.2004, 18:11:32
    #32590055
Rivkin Dmitry
Rivkin Dmitry
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Список: переход на первую запись после удаления текущей - можно ли по другому?
Может поможет, хотя вопрос до конца не понятен. До удаления надо спасти
n = MyList.ListIndex

А после удаления
If n > 1 Then
MyList = MyList.ItemData(n-1)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.07.2004, 18:24:12
    #32590077
Shuhard
Shuhard
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Список: переход на первую запись после удаления текущей - можно ли по другому?
я длинне делаю с учётом последней строки

Код: plaintext
1.
2.
3.
4.
5.
MyPoz = IIf(Me![Sp_Num].ListIndex < (Me![Sp_Num].ListCount -  1 ), Me![Sp_Num].ListIndex, Me![Sp_Num].ListIndex -  1 )
...
Me![Sp_Num].Requery
Me![Sp_Num].Selected(MyPoz) = True
Me![Sp_Num] = Me![Sp_Num].Column( 0 )
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.07.2004, 18:54:19
    #32590123
Benzin
Benzin
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Список: переход на первую запись после удаления текущей - можно ли по другому?
Спасибо, второй вариант работает точнее(первый переводит фокус на две записи вверх). Правда при удалении первой записи не происходит выделения "новой первой" (в остальных случаях та запись, куда переходим - выделена), но это, наверное уже "эстетство"? :))
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.07.2004, 19:13:23
    #32590151
Shuhard
Shuhard
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Список: переход на первую запись после удаления текущей - можно ли по другому?
BenzinСпасибо, второй вариант работает точнее(первый переводит фокус на две записи вверх). Правда при удалении первой записи не происходит выделения "новой первой" (в остальных случаях та запись, куда переходим - выделена), но это, наверное уже "эстетство"? :))

1 2 выше - измени
Код: plaintext
1.
MyList = MyList.ItemData(n- 1 )  на MyList = MyList.ItemData(n+ 1 )

2- у меня если список не пуст то выделяется первая средняя последняя(т.е. все варианты)!
нет-ли проблем с ключом под списком и сортировкой!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Список: переход на первую запись после удаления текущей - можно ли по другому? / 7 сообщений из 7, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 476ms
Закрыть
start [/forum/topic.php?fid=45&mobile=1&tid=1673408]:
 0ms
get settings:
 10ms
get forum list:
 20ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 171ms
get topic data:
 8ms
get forum data:
 2ms
get page messages:
 33ms
get tp. blocked users:
 1ms
others: 225ms
total:  476ms
x
x
Закрыть


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