Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.11.17;
Скачать: CL | DM;

Вниз

Перетаскивание обьектов на мою форму (компонент)   Найти похожие ветки 

 
Mouse   (2003-11-05 11:49) [0]

Есть такая ситуация:
Хочу чтоб была возможность перетаскивать файлы или папки на мой компонент!
Скажите мне пожалуйста:
Как обработать ето событие, и как узнать что именно на мой компонент перетащили (файл или папку)
Компонент не поддерживает события класа OnDrag
Есть только поддержка обработки событий класа OnMouse

Заранее спасибо


 
Skier ©   (2003-11-05 11:53) [1]

1) перкрываешь форме оконную процедуру
2) в своей оконной процедуре обрабатываешь сообщение WM_DROPFILES
3) Это должно работать только в run-time


 
Юрий Федоров ©   (2003-11-05 11:53) [2]

>>Skier © (05.11.03 11:53) [1]
А в Design-time кто запрещает :-)) ?


 
Skier ©   (2003-11-05 11:55) [3]

>Юрий Федоров © (05.11.03 11:53) [2]
Никто


 
Mouse   (2003-11-05 11:59) [4]

Люди а можно код увидеть?


 
Mouse   (2003-11-05 13:03) [5]


> Skier © (05.11.03 11:53) [1]
> 1) перкрываешь форме оконную процедуру
> 2) в своей оконной процедуре обрабатываешь сообщение WM_DROPFILES
> 3) Это должно работать только в run-time


Можно поподробнее?


 
Skier ©   (2003-11-05 13:07) [6]

http://delphiworld.narod.ru/base/wm_dropfiles.html


 
Mouse   (2003-11-05 17:31) [7]

Спасибо!
Работает!
Но вот тока маленькая мелочь!,..Я хочу чтоб срабатывало не тогда, когда на форму перетягивают!.. а срабатывало именно тогда, когда попали на некий компонент!

Вот например у меня на форме есть компонент Panel1 группы Standart!

Как сделать чтоб отрабатывало именно при попадании на етот компонент?

Заранее спасибо!


 
Skier ©   (2003-11-05 17:37) [8]


> есть компонент Panel1

Писать тоже самое (обработку WM_DROPFILES) для Panel1



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

Текущий архив: 2003.11.17;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.02 c
1-56761
Narayan
2003-11-06 12:31
2003.11.17
application-defined exception


1-56577
Abrakadabra
2003-11-06 00:03
2003.11.17
Сравнение файлов


14-56910
McSimm
2003-10-24 20:09
2003.11.17
---|Ветка была без названия|---


4-56970
Ozi
2003-09-23 14:15
2003.11.17
Как с эмулировать нажатие на Enter


1-56692
ilka
2003-11-07 16:38
2003.11.17
c VB на Delphi