Форум: "Базы";
Текущий архив: 2006.04.09;
Скачать: [xml.tar.bz2];
ВнизПодсказка для конкретной записи. Найти похожие ветки
← →
TrainerOfDolphins © (2006-02-14 11:13) [0]Доброго!
Подскажите, пожалуйста, каким образом можно узнать ID записи, над которой находится в данный момент указатель мыши
в DBGrid"е. Мне нужно вывести хинт для конкретной записи...
Заранее спасибо.
← →
Sergey13 © (2006-02-14 11:18) [1]В EhLib-овском гриде - это реализовано. Можно юзать (до версии 3.6 бесплатно) можно смотреть реализацию.
← →
Style © (2006-02-14 12:43) [2]Ну вот что то типа того:
type
_TCustomDBGrid = class (TCustomDBGrid);
procedure TForm1.DBGrid1MouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
var
Coord: TGridCoord;
OldRec: integer;
begin
if(Sender is TCustomDBGrid) then
with _TCustomDBGrid(Sender) do
begin
Coord := MouseCoord(X,Y);
OldRec := DataLink.ActiveRecord;
if(Coord.Y > 0) and (Coord.Y <= DataLink.RecordCount) then
DataLink.ActiveRecord := Coord.Y-1;
try
if(Coord.X > 0) and (Coord.X <= Columns.Count) then
begin
if(Hint <> Columns[Coord.X-1].Field.AsString) then
begin
Hint := Columns[Coord.X-1].Field.Value;
end;
Application.ActivateHint(Point(X,Y));
ShowHint := true;
end;
finally
DataLink.ActiveRecord := OldRec;
end;
end;
end;
← →
TrainerOfDolphins © (2006-02-14 13:09) [3]Где взять?
← →
TrainerOfDolphins © (2006-02-14 13:25) [4]
> Style © (14.02.06 12:43) [2]
Пасиба :)
← →
Виталий Панасенко (2006-02-14 14:47) [5]
> TrainerOfDolphins © (14.02.06 13:09) [3]
> Где взять?
www.ehlib.com
← →
TrainerOfDolphins © (2006-02-16 13:11) [6]
> Style © (14.02.06 12:43) [2]
Всё это хорошо. Я б до такого сам бы не додул. Но твой метод похоже не позволяет выяснить ID записи, над которой находится мышка (если, конечно, ID не отображён в гриде. А он у меня не отображён как раз :) ). У меня есть свой способ как это сделать, но поскольку я весьма неопытен, боюсь, не делаю ли я лишних движений? Я тебе не показываю свой способ, чтобы не направить твоё мышление в некоструктивное русло :) (потом выложу). Есть какие идеи именно по определению ID? Не обязательно готовый код, хотя бы направление мысли :).
Заранее благодарен.
← →
TrainerOfDolphins © (2006-02-16 13:13) [7]
> Виталий Панасенко (14.02.06 14:47) [5]
Спасиба, вэри мач!
Страницы: 1 вся ветка
Форум: "Базы";
Текущий архив: 2006.04.09;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.014 c