Скачать: CL | DM;

Как переставить указатель на нужную запить 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 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: -0.8 c