Drag&Drop из грида в мемо

← →
Denis.ua (2005-08-15 15:41) [0]

Привет всем.
Может у кого есть примерчик по сабжу или ссылки...
спасибо за помощь

← →
Leonid Troyanovsky © (2005-08-15 22:05) [1]

> Denis.ua (15.08.05 15:41)
> Может у кого есть примерчик по сабжу или ссылки...

{StringGrid.DragMode := dmAutomatic}

procedure TForm1.Memo1DragDrop(Sender, Source: TObject; X, Y: Integer);
begin
with Sender as TMemo, Source as TStringGrid do
SelText := Cells[Col, Row];
end;

--
Regards, LVT.

Drag&amp;Drop из грида в мемо Найти похожие ветки

Drag&Drop из грида в мемо Найти похожие ветки