свойство CheckListBox'а hint (для каждой записи)

[KORT]

Время доброе!
Есть CheckListBox1, в который заносится разное количество items. Как сотворить следующее: при наведении на конкретный item, появлялся hint с содержанием названия данного item.

[phomm]

Думаю, можно попробовать отслеживать OnMouseMove вычислять итем по координатам по ListBox.ItemAt() и формировать ListBox.Hint и вызывать его по Application.ShowHint. В начале маусмува, ещё и проверять а не виден ли хинт прямо сейчас , и выходить из процедуры, а то гипотетически будет мерцание хинта при проведении мышкой.

Надо просто попробовать.

[Sciv]

Определять значение итема под курсором мыши и присваивать hint значение. Думаю, прописывать весь этот код нужно в событии OnMouseMove.

[Аватар]

Когда-то делал примерно так

procedure TForm1.CheckListBox1MouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer);
var xPoint: TPoint;
    xIndex: Integer;
begin
  xPoint.X:=X;
  xPoint.Y:=Y;
  xIndex:=CheckListBox1.ItemAtPos(xPoint,True);
  if xIndex<>-1 then begin
    CheckListBox1.Hint:=CheckListBox1.Items[xIndex];
    Application.ActivateHint(xPoint);
  end
  else Application.CancelHint;
end;

[KORT]

всем спасибо...

про координаты тоже думал...и реализовал чуток...думал может есть способ через свойства объекта....