| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Научите меня drag n drop у :-) [D6, WinXP]
DNT © (2002-09-08 17:04:00)Не знаю, как реализовать это.
Нужно, что бы на иконку в трее кидали файл.
А дальше, прога его должна обрабатывать.
Иконку в трей помещаю так:
ticon.cbSize:=SizeOf(ticon);
if configuration.icon="" then ticon.hIcon:=LoadIcon(HInstance,PChar("TRAY"))
else ticon.hIcon:=ExtractIcon(handle,PChar(configuration.icon ),configuration.icon_index);
ticon.Wnd:=Bar_Form.Handle;
ticon.szTip:="Tray Bar Pro (beta)";
ticon.uCallbackMessage:=WM_USER+1;
ticon.uFlags:=NIF_MESSAGE OR NIF_TIP OR NIF_ICON;
ticon.uID:=32;
Shell_NotifyIcon(NIM_ADD,@ticon);
Спасибо : )
Cobalt (2002-09-09 21:49:00) [1]Насколько я знаю, Системный лоток не поддерживает перетаскивание файлов (Хотя, это в Вин98)
Поищите в http://msdn.microsoft.com/library/, может в ХР уже есть...
MetalFan (2002-09-09 10:54:00) [2]посмотрите http://delphi.mastak.ru/articles/dragndrop/index.html
может поможет?
| |
