Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Система";
Текущий архив: 2002.11.11;
Скачать: [xml.tar.bz2];

Вниз

Научите меня 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;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.44 MB
Время: 0.008 c
4-34303
Azzazzin
2002-10-02 15:09
2002.11.11
Очень нужна помощь! RegisterClass & CreateWindow.


8-34124
Vladimir Prokofiev
2002-07-17 17:28
2002.11.11
Что за зверь TCanvas3D в Delphi 5


14-34232
vopros
2002-10-23 15:21
2002.11.11
Давайте устроим интелектуальную дуель со мной.


1-34095
Alex
2002-10-31 13:22
2002.11.11
Внутренний код клавиши пробел


3-33862
maras
2002-10-22 10:05
2002.11.11
Контекстный поиск в таблице





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский