Почему этот код вызывает ошибку?

← →
Yanis © (2003-06-06 22:11) [0]

var sel:Integer; begin Sel:=ListBox2.SelCount; ListBox1.Selected[sel]:=True;

А если точнее, то как реализовать данный код, так что бы не генерировалась ошибка.

← →
Александр из Минска © (2003-06-06 22:23) [1]

То есть ты хочешь выделить в первом списке тот элемент, номер которого равен выделенному во втором списке? Если так, то:
ListBox1.ItemIndex := ListBox2.ItemIndex;

← →
Александр из Минска © (2003-06-06 22:27) [2]

А насчет твоего, то тебе наверное надо убирать фокус со старого, так как 2 фокуса в одном компаненте это нехорошо.
var lastsel, newsel : Integer;. ... begin ... ListBox1.Selected[lastsel] := False; ListBox1.Selected[newsel] := True; ... end;

← →
Yanis © (2003-06-06 22:33) [3]

Спасибо!
А можно сделать так чтобы это делалось немного по быстрее, а то как то заторможено выходит?

← →
Александр из Минска © (2003-06-06 22:35) [4]

Насчет скорости не знаю. А то, что я ранее писал помогло хоть?

Удалено модератором
Примечание: Личная переписка

Спасибо за помощь. Код помог. Просто в моём случае это хоть что-то, у меня задача: стоит hook, при клике мышью в системе записывается инфа(координаты курсора, какой клавишей был сделан клик, во сколько) в ListBox. При выделении в ListBox пункта с координатами на экране появляется стрелка и показывает где именно был сделан клик. А ListBox"а два(поэтому надо выделять одновременно) Решить эту задачу смог только этим способом. Может он в принципе и не рациональный.

Почему этот код вызывает ошибку? Найти похожие ветки