Показать сообщение отдельно
  #4  
Старый 03.05.2010, 19:33
milano milano вне форума
Прохожий
 
Регистрация: 13.04.2010
Сообщения: 10
Репутация: 10
По умолчанию

в DBGrid есть длинные строки, которые не вмещаются в ячейках. Причем в каждом строке. Нужно, когда выделяешь одну строку, для ячеек этой строки при наведении на них курсора мыши выходила подсказка.
я написала такой код, но выходит ошибка

Код:
procedure TForm2.DBGrid1MouseMove(Sender: TObject; Shift: TShiftState; X,
  Y: Integer);
  var    mc:TGridCoord;
begin
 mc:=DBGrid1.MouseCoord(x,y);
 Application.ActivateHint(Mouse.CursorPos);
 DBGrid1.ShowHint:=true;
  DBGrid1.Hint:=DBGrid1.DataSource.DataSet.Fields[mc.x-1].AsString;
end;

lmikle: Предупреждение! Используем теги.
Ответить с цитированием