Форум: "Базы";
Текущий архив: 2003.11.13;
Скачать: [xml.tar.bz2];
ВнизКак переставить указатель на нужную запить DBGrid a Найти похожие ветки
← →
axx (2003-10-20 12:49) [0]Как програмно переставить указатель на нужную запить DBGrid"a.
Хочу сделать чтобы указатель за DBGrida перемещался на элемент под мышой.
Спасибо.
← →
Malkolinge (2003-10-20 13:05) [1]Ищи в dataSet е.
← →
axx (2003-10-20 13:14) [2]А как быть со скролом. Как узнать количество запесей наверху грида которые не вошли в него ?
← →
aVast (2003-10-20 13:25) [3]Query.Locate("FieldName", "SearchString",[loCaseInsensitive,loPartialKey])
← →
axx (2003-10-20 13:35) [4]Приведенный ниже кусок работает но если нет скрола (т.е. все записи вошли в грид). А как быть со скролом. Непонимаю как Locate мне может помочь :-(((
Ткните пальцом плз как эти грабли обойти.
procedure TMDIChild.DBGridEh1MouseMove(Sender: TObject; Shift: TShiftState;
X, Y: Integer);
var
ScrPt,GrdPt:TPoint;
Cell:TGridCoord;
begin
if not (Sender is TDBGrideh) then exit;
ScrPt:=Mouse.CursorPos;
GrdPt:=(Sender as TDBGrideh).ScreenToClient(ScrPt);
Cell:=(Sender as TDBGrideh).MouseCoord(GrdPt.X,GrdPt.Y);
if Cell.Y in [0..(Sender as TDBGrideh).DataSource.DataSet.RecordCount-1] then begin
(Sender as TDBGrideh).DataSource.DataSet.RecNo:=Cell.Y+1;
end;
← →
DenK_vrtz (2003-10-20 13:48) [5]>Как узнать количество запесей наверху грида которые не вошли в него ?
извините, а зачем это нужно? ведь это изврат чистой воды!
← →
axx (2003-10-20 13:50) [6]Мне нужно чтобы указатель бегал по гриду вслед за мышкой.
← →
DenK_vrtz (2003-10-20 13:58) [7]axx © (20.10.03 13:50) [6], это конечно все хорошо и КРУТО, только вот последствия данного действа могут иметь печальный итог. К примеру, случайное удаление не тех записей!
← →
axx (2003-10-20 14:00) [8]Это нужно только для нередактируемых таблиц
Страницы: 1 вся ветка
Форум: "Базы";
Текущий архив: 2003.11.13;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.035 c