Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > [ "Начинающим" ]
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 28.04.2010, 13:22
milano milano вне форума
Прохожий
 
Регистрация: 13.04.2010
Сообщения: 10
Репутация: 10
По умолчанию появление подсказки при наведении курсора мыши

как сделать так, чтобы при наведении курсора мыши на строку в таблице эта строка отображалась в виде подсказки
Ответить с цитированием
  #2  
Старый 28.04.2010, 19:11
Аватар для Bars1992
Bars1992 Bars1992 вне форума
Активный
 
Регистрация: 24.04.2010
Адрес: Украина, Кременчуг
Сообщения: 249
Репутация: 22
По умолчанию

Детальней строка какой таблици? Как компонент зовётся?
__________________
Не твори зла, и жизнь повернется к тебе передом
Ответить с цитированием
  #3  
Старый 28.04.2010, 20:10
Аватар для Страдалецъ
Страдалецъ Страдалецъ вне форума
Гуру
 
Регистрация: 09.03.2009
Адрес: На курорте, из окна вижу теплое Баренцево море. Бррр.
Сообщения: 4,723
Репутация: 52347
По умолчанию

Цитата:
Сообщение от milano
как сделать так, чтобы при наведении курсора мыши на строку в таблице эта строка отображалась в виде подсказки
Обработать событие OnMouseMove для вашей таблицы и присвоить свойству Hint для таблицы значение записи под курсором.
__________________
Жизнь такова какова она есть и больше никакова.
Помогаю за спасибо.
Ответить с цитированием
  #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: Предупреждение! Используем теги.
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 12:46.


 

Сайт

Форум

FAQ

Соглашения

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2025