Вверх ↑
Ответов: 2125
Рейтинг: 159
#1: 2006-10-04 19:54:30 ЛС | профиль | цитата
Такой уж он в KOL-e
function TControl.Add(const S: String): Integer;
begin
if fCommandActions.aAddItem <> 0 then
begin
Result := Perform( fCommandActions.aAddItem, 0, Integer( PChar( S ) ) );
if Count = 1 then
ItemSelected[ 0 ] := True;
end

ItemSelected[n] := True для обычного ListBox устанавливает текущий выбранный, для MultiSelect - отмечает строку.

Вобщем, KOL под MultiSelect для ListBox не заточен.

[size=-2]------ Добавлено в 19:54
Вот исправленный вариант
карма: 1

0
файлы: 1ListBox_chk.rar [3.9KB] [303]