------------ Дoбавленo в 12.14:
Если я правильно понял защиту от второго срабатывания, то должно получиться что-то типа вот этого
procedure THIStringTable._OnClick;
begin
if (Control.LVCurItem <> -1) and not fSelect then
_hi_OnEvent(_event_onClick,Control.LVCurItem);
fSelect := false;
end;
procedure THIStringTable._OnSelState;
begin
//_debug(newstate);
if newstate = 3 then
begin
fSelect := true;
_hi_OnEvent(_event_onClick,IdxFrom);
_hi_OnEvent(_event_onSelect,IdxFrom);
end;
end;
И точно ли надо ставить защиту от второго срабатывания, если его нет
------------ Дoбавленo в 12.22:
Dilma, плхоже, что мы недопоняли друг друга. Народ хочет (в принципе, правильно), что бы onClik возникал всегда, независимо от того какой пункт выбран, пусть и тот же самый, а вот onSelect должен возникать только при смене пункта. В предыдущем релизе, onClick срабатывал как onSelect, только при смене пункта, и это не устраивало, так как для получения события с того же пункта приходилось использовать события onMouse и нижние переменные.
Мне же показалось, что ты говорил про получении двух событий onClick с одного пункта при одном нажатии (двоение). И почему было принят решение перейти на onSelect в качестве onClick, мне непонятно, особенно, если у него нет двоения