Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.11.13;
Скачать: 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 вся ветка

Текущий архив: 2003.11.13;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.023 c
1-41285
Nucl
2003-10-31 14:31
2003.11.13
Проблема с QuickReport


3-41075
Senator
2003-10-23 16:14
2003.11.13
FireBird


1-41335
Ganjo
2003-10-30 18:27
2003.11.13
Компонет Edit: Как запретить ввод буквенных символов


1-41240
Doctor Deejay
2003-11-01 10:38
2003.11.13
ComboBox Больше! Еще больше!


1-41234
qwerty2
2003-11-03 22:53
2003.11.13
Структура как возвращаемое функцией значение