Форум программистов, компьютерный форум, киберфорум
Delphi: Базы данных
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.62/13: Рейтинг темы: голосов - 13, средняя оценка - 4.62
0 / 0 / 0
Регистрация: 05.06.2014
Сообщений: 3

Hint для каждого столбца DBGrid

05.06.2014, 17:51. Показов 2814. Ответов 3
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Здравствуйте.
Мне надо чтобы на каждый столбец в DBGrid всплывала подсказка, в этой подсказке я хотел в вкратце описать для чего нужен столбец. Помогите.Заранее спасибо.
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
05.06.2014, 17:51
Ответы с готовыми решениями:

Hint для каждой записи в DBGrid
Здравствуйте. Есть sDBGrid (использую Alpha Controls) в нем выводится порядка 1000 записей. Как сделать что бы при наведении мышкой на...

Занести сумму столбцов каждого столбца DbGrid в свой Edit
доброе всем время суток. написал код для вывода суммы столбца в tdit.столбцов 6 и соответственно 6 едитов. var i:integer; ...

Вычесть из каждого столбца матрицы максимальный элемент для каждого столбца, и результат вывести в матрицу
Что нужно добавить , чтобы вычесть из каждого столбца матрицы максимальный элемент для каждого столбца и результат вывести в матрицу? ...

3
23 / 23 / 5
Регистрация: 30.04.2012
Сообщений: 75
05.06.2014, 20:10
Первый же запрос выдает желаемый ответ..
GOoGL...

Перед тем как задать вопрос нужно хоть немного поискать...
0
1076 / 989 / 340
Регистрация: 07.08.2012
Сообщений: 2,790
05.06.2014, 20:12
У DBGrid создать процедуру обработки события OnMouseMove, где прописать:
Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
procedure TForm2.DBGrid1MouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer);
var
  G :  TGridCoord;
  S : string;
begin
  G := DBGrid1.MouseCoord(X, Y);
  if G.Y = 0 then begin
    case G.X of
      1 : S := '1 - первый';
      2 : S := '2 - второй';
      //... и т.д.
    end;
    DBGrid1.Hint := S;
    Application.ActivateHint(Mouse.CursorPos);
  end else
    Application.HideHint;
end;
0
 Аватар для Cold
87 / 87 / 65
Регистрация: 22.05.2014
Сообщений: 485
05.06.2014, 20:22
Delphi
1
2
3
4
5
6
7
8
9
procedure TForm1.DBGrid2MouseMove(Sender: TObject; Shift: TShiftState; X,
  Y: Integer);
var
    ACol,ARow   : integer;
begin
    TStringGrid(DBGrid2).MouseToCell(x,y,ACol,ARow);
      if (ACol <> -1) then
        StatusBar2.Panels[0].Text := DBGrid2.Fields[ACol-1].DisplayLabel;
end;
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
05.06.2014, 20:22
Помогаю со студенческими работами здесь

Изменение Hint для каждого значения ячейки StringGrid
Всем доброго времени суток. Кто может подсказать как можно реализовать, что бы когда наводишь на ячейку StringGrid-a в Hint выводилось это...

Для каждого повторяющегося значения найти среднее значение каждого столбца
дано: искомая таблица, в которой есть повторяющиеся строки в столбце B . (Допустим, 60310 - 3 штуки). Они есть правее искомой...

Для каждого столбца матрицы с чётным номером вычислить сумму квадратов элементов этого столбца
. Создать матрицу 4х4. Для каждого столбца с четным номером вычислить сумму квадратов элементов этого столбца. Вывести результат. ...

Массив: Определить суммы элементов каждого столбца левой половины и каждого четного столбца правой половины матрицы A
Матрица A (M кратно 4) разделена по вертикали на две половины. Определить сумму элементов каждого столбца левой половины и сумму элементов...

Найти сумму положительных элементов каждого четного столбца и произведение отрицательных элементов каждого нечетного столбца
Дана матрица А(5,6). Найти сумму положительных элементов каждого четного столбца и произведение отрицательных элементов каждого нечетного...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Новые блоги и статьи
Использование SDL3-callbacks вместо функции main() на Android, Desktop и WebAssembly
8Observer8 24.01.2026
Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а привычная функция main(). . .
моя боль
iceja 24.01.2026
Выложила интерполяцию кубическими сплайнами www. iceja. net REST сервисы временно не работают, только через Web. Написала за 56 рабочих часов этот сайт с нуля. При помощи perplexity. ai PRO , при. . .
Модель сукцессии микоризы
anaschu 24.01.2026
Решили писать научную статью с неким РОманом
http://iceja.net/ математические сервисы
iceja 20.01.2026
Обновила свой сайт http:/ / iceja. net/ , приделала Fast Fourier Transform экстраполяцию сигналов. Однако предсказывает далеко не каждый сигнал (см ограничения http:/ / iceja. net/ fourier/ docs ). Также. . .
http://iceja.net/ сервер решения полиномов
iceja 18.01.2026
Выкатила http:/ / iceja. net/ сервер решения полиномов (находит действительные корни полиномов методом Штурма). На сайте документация по API, но скажу прямо VPS слабенький и 200 000 полиномов. . .
Расчёт переходных процессов в цепи постоянного тока
igorrr37 16.01.2026
/ * Дана цепь(не выше 3-го порядка) постоянного тока с элементами R, L, C, k(ключ), U, E, J. Программа находит переходные токи и напряжения на элементах схемы классическим методом(1 и 2 з-ны. . .
Восстановить юзерскрипты Greasemonkey из бэкапа браузера
damix 15.01.2026
Если восстановить из бэкапа профиль Firefox после переустановки винды, то список юзерскриптов в Greasemonkey будет пустым. Но восстановить их можно так. Для этого понадобится консольная утилита. . .
Сукцессия микоризы: основная теория в виде двух уравнений.
anaschu 11.01.2026
https:/ / rutube. ru/ video/ 7a537f578d808e67a3c6fd818a44a5c4/
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru