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

Drag&Drop в DBGrid   Найти похожие ветки 

← →
Denned   (2005-09-19 16:16) [0]

Здравствуйте! У меня возникла проблема с Drag&Drop для DBGrid. Суть её в том, что Drag&Drop срабатывает только, если щелкнуть по заголовку таблицы. Для обычных записей это почему-то не срабатывает. Вот код:

procedure TMainForm.DBGrid1MouseDown(Sender: TObject; Button: TMouseButton;
 Shift: TShiftState; X, Y: Integer);
begin
 if (Button = mbLeft) and (ssAlt in Shift) then begin
   DBGrid1.BeginDrag(False);
 end;
end;

При этом все это прекрасно работает, если заменить DBGrid на какой-нить TreeView. А для DBGrid это срабатывает почему-то только для заголовков!

Подскажите пожалуйста, уважаемые, в чем загвоздка?

---

← →
MBo ©   (2005-09-19 17:05) [1]

перетаскивать нужно в грид или из него?

---

← →
Denned   (2005-09-20 08:21) [2]

Из грида в TreeView.

---

← →
MBo ©   (2005-09-20 11:03) [3]

DragDetect

---

Страницы: 1 вся ветка

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



Память: 0.45 MB
Время: 0.022 c