Текущий архив: 2002.11.11;
Скачать: CL | DM;
Вниз
Научите меня drag n drop у :-) Найти похожие ветки
← →
DNT (2002-09-08 17:04) [0]Не знаю, как реализовать это.
Нужно, что бы на иконку в трее кидали файл.
А дальше, прога его должна обрабатывать.
Иконку в трей помещаю так:
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);
Спасибо : )
← →
MetalFan (2002-09-09 10:54) [1]посмотрите http://delphi.mastak.ru/articles/dragndrop/index.html
может поможет?
← →
Cobalt (2002-09-09 21:49) [2]Насколько я знаю, Системный лоток не поддерживает перетаскивание файлов (Хотя, это в Вин98)
Поищите в http://msdn.microsoft.com/library/ , может в ХР уже есть...
Страницы: 1 вся ветка
Текущий архив: 2002.11.11;
Скачать: CL | DM;
Память: 0.44 MB
Время: 0.007 c
