Вопросы по ListView

[Anfall]

Доброго времени суток всем!
У ListView есть процедура Selectitem(int).

1) Но почему-то она работает только если ListView в фокусе. Если не в фокусе, то ничего не выделяется. Как исправить?

2) Можно ли как-то убрать горизонтальную прокрутку в ListView?

Заранее благодарен

Теме ап(
Вот пишу:
ListView1.ItemIndex:=random(ListVie w.Items.Count-1);
Но визуально ничего не происходит! Как исправить?

[DIgorevich]

Сделай так:

Ranomize;
ListView1.ItemIndex:=random(ListView1.Items.Count-1);
form1.ActiveControl:=ListView1;

Свой второй вопрос, мог бы и сам поискать, хотя бы здесь: http://delphiworld.narod.ru/base/hide_lw_scrolls.html

[Grag]

DIgorevich, лично я сделал бы так:

ListView1.ItemIndex:=random(ListView1.Items.Count);

т.к. функция random возвращает значение из диапазона 0..range-1.

[evg_m]

Если не в фокусе, то ничего не выделяется. Как исправить?

из спрвки (Tlistview F1 Properties )

Determines whether the list view gives a visual indication of which item is selected when focus shifts to another control.

Delphi syntax:

property HideSelection: Boolean;

[Anfall]

Спасибо все за ответы. Буду разгребать.

[PVD]

Добрый день, попробовал вот это, однако при попытке выбора элемента в TListView появляется ошибка:"Невозможно сфокусироваться на отключенном или спрятанным окном"
Как избавиться от данной ошибки, заранее спасибо

[DIgorevich]

А какие свойства у окна и у ListView?

[PVD]

Вот такие:
Окно, ListView

[DIgorevich]

Хорошо, теперь показывай код, свой, который не работает. А также строку которую Среда выделяет при ошибки (если запускать по F9).

[PVD]

Вопрос в том что ошибка происходит просто так когда нажимаю на элемент TListView, там кода нет, а сама среда показывает ошибку здесь: