Показать хинт по клику

[TwiX]

Делал так - в OnSelectCell:

if StringGrid1.Col=1 then
  begin
    StringGrid1.Hint:=StringGrid1.Cells[ACol, ARow];
    //StringGrid1.ShowHint:=true;
    Application.ActivateHint(Mouse.CursorPos);
  end;

ShowHint выставлял как у формы, так и у стринггрида.

[_Engine_]

  with StringGrid1 do
  begin
    Hint := 'Row = ' + IntToStr(ARow) + '; ACol = ' + IntToStr(ACol);
    ShowHint := true;
  end;

[TwiX]

Нужно чтобы сразу показывал - без задержки

[Stilet]

А ты этот код в OnMouseMove кинь а не в OnSelectCell

[TwiX]

Спасибо, помогло. Сам думал, что хинт не появляется из-за того, что после него идёт клик, но проверить поленился) А у StringGrind'а нет никакой процедуры получение ячейки из под курсора?

[Stilet]

А у StringGrind'а нет никакой процедуры получение ячейки из под курсора?

Чегож нет? Все есть

procedure TForm1.StringGrid1MouseMove(Sender: TObject; Shift: TShiftState; X,
  Y: Integer);
  var c:TGridCoord;
begin
 c:=StringGrid1.MouseCoord(x,y);
 c.X - Это колонка
 c.y - Это строка
end;