Drag&drop Файлов: Shift - Вырезаем, Alt - Делаем Ярлык. Как?

Тема в разделе "Delphi - Система", создана пользователем kuzduk, 17 фев 2012.

  1. kuzduk

    kuzduk Member

    Регистрация:
    21 сен 2011
    Сообщения:
    19
    Симпатии:
    0
    Вот модули, чтоб Drag&Drop-нуть файлы из своей программы в проводник или из проводника в свою программу:

    kuDrag(для захвата из своей программы): http://kuzduk.zz.mu/prog/kuDragDemo.zip
    kuDrop(для бросания в свою программу): http://kuzduk.zz.mu/prog/kuDropDemo.zip


    Подскажите пожалйста, как допрограммировать чтоб: при перетаскивании при удержании Shift - вырезалось, а при Alt - ярлык содавался?
     
  2. kuzduk

    kuzduk Member

    Регистрация:
    21 сен 2011
    Сообщения:
    19
    Симпатии:
    0
    Новые модули к вашим услугам
     
  3. kuzduk

    kuzduk Member

    Регистрация:
    21 сен 2011
    Сообщения:
    19
    Симпатии:
    0
    Подскажите пожалйста, как допрограммировать чтоб: при перетаскивании при удержании Shift - вырезалось, а при Alt - ярлык содавался?
     
  4. planetoxod

    planetoxod Member

    Регистрация:
    7 мар 2015
    Сообщения:
    9
    Симпатии:
    0
    В Drop е
    Вставить файл в проводник
    if (GetKeyState(VK_LSHIFT) AND 128)=128 then begin

    вырезать в ........
    end;
     
Загрузка...

Поделиться этой страницей