На форме есть два списка со множественным выбором. Требуется, чтобы при выборе одного или нескольких значений в первом списке выбранные значения отображались бы во втором списке. Всё относительно неплохо работает через событие AfterUpdate первого списка при выборе значений из списка мышью (используется ItemsSelected в цикле). Если же выбирать значения с помощью клавиатуры стрелками - всё не работает должным образом. Это происходит из-за того, что выделение значений списка происходит после события AfterUpdate списка и в коллекции ItemsSelected новые значения просто не успевают появиться!

Каким образом можно обойти данную проблему?
Я реализовал через дополнительную кнопку, при щелчке по которой происходит заполнение и отображения второго списка. Но это какие-то костыли. Наверняка есть более элегантное решение.

В прикрепленном файл примера.

Мне нужен связный выбор для использования клавиатуры. В моем приложении в данном случае было бы удобнее работать без мыши. Но я подумаю над этим, если не будет более толкового решения.

Всем большое спасибо за ответы - проблема решена.

2mds_world: буду использовать Простой выбор, так как изначально забыл про выделение пробелом, а после тестирования вариантов с Простым выбором и Связным выбором (работающим адекватно) удобнее оказался Простой.

2Agapov_stas: действительно, отлично работает. Даже без Me.Repaint. Просто нужно сделать одинаковые процедуры в AfterUpdate и KeyUp.

2lord_de_tempest: да, самый простой способ.

В итоге выбрал Простой выбор, так как только с ним получилось выбрать "один", "два" и "четыре" без привлечения мыши.