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

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

Drag&Drop из грида в мемо [D7, WinXP]

Denis.ua ©   (2005-08-15 15:41:00) 

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

---

Leonid Troyanovsky   (2005-08-15 22:05:00) [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.

---

Наверх