| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Уважаемые как по MouseCoord в TDBGrid [D6, Win95/98]

George3 ©   (2002-12-10 14:48:00) 

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

---

MBo   (2002-12-10 18:49:00) [1]

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


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;


---

Romkin   (2002-12-10 18:01:00) [2]

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

---

George3   (2002-12-10 16:40:00) [3]

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

---

Romkin   (2002-12-10 16:18:00) [4]

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

---

George3   (2002-12-10 16:10:00) [5]

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

---

AlexandrN   (2002-12-10 15:34:00) [6]

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

---

George3   (2002-12-10 15:13:00) [7]

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

---

AlexandrN   (2002-12-10 14:52:00) [8]

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

---

Наверх