Уважаемые как по MouseCoord в TDBGrid

← →
George3 (2002-12-10 14:48) [0]

определить запись в DataSet"е, не могу сообразить. Отзовитесь кто знает

← →
AlexandrN (2002-12-10 14:52) [1]

Уточни вопрос, что именно ты хочешь получить в результате.
Установить указатель на запись под КРЫСОЙ штоли ????

← →
George3 (2002-12-10 15:13) [2]

Уточняю: для обработчика DragDrop по MouseCoord установить указатель на запись в DataSet"е и выбрать значения для дальнейших действий

← →
AlexandrN (2002-12-10 15:34) [3]

Уточни ещё пожалуйста, куда собираешься перетаскивать запись, то есть тип компонента....

← →
George3 (2002-12-10 16:10) [4]

Для AlexandrN:
Мне надо не запись перенести, а
1) по MouseCoord определяю строку в TDBGrid
2) по строке из TDBGrid пока неизвестным образом определить запись в DataSet"е
3) в этой записи по значениям некоторых полей запустить требуемую ХП на SQL 2000, которая выполнит все изменения
4) перерисовать TDBGrid и остальные необходимые компоненты на форме
... теперь, наверное, вся идея

← →
Romkin © (2002-12-10 16:18) [5]

Хм... Не вижу легального пути, кроме как щелкнуть на ячейке и обработать OnCellClick - там ты уже на той записи в таблице, что нужна

← →
George3 (2002-12-10 16:40) [6]

Для Romkin ©
... но я бы хотел сделать красиво через Drag & Drop а не давать пользователю задание: выбери в TTreeView элемент, выбери строку в TDBGrid, нажми кнопку на панели чтобы выполнить действие.
Спасибо всем, кто со мной возится !

Нажимать кнопку не надо - щелкни на строке грида, и все, OnClick отрабатывает

мелкое хакерство:

TDBGrid=class(DBGrids.TDBGrid); ... procedure TForm1.DBGrid1MouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer); var Coord:TGridCoord; CurRec:Integer; begin with DBGrid1 do begin Coord:=MouseCoord(x,y); form1.caption:=inttostr(coord.y); with Coord do if (Y<1) or (X<1) or (X>Columns.Count) then Exit; CurRec:=DataLink.ActiveRecord; DataLink.ActiveRecord:=Coord.Y-1; Edit1.Text:=Columns[Coord.X-1].Field.AsString; DataLink.ActiveRecord:=CurRec; end; end;

Уважаемые как по MouseCoord в TDBGrid Найти похожие ветки