Отправлено: 06.05.15 10:58. Заголовок: Список файлов

Приветствую !

В винде открываем папку. В ней некие файлы. Помечаем нужные и правой кнопкой копируем. Т.е., я так понимаю, в клипборде сохраняются ссылки на эти файлы. Далее - в моей проге есть бровс, правой кнопкой мыши мне нужно вставлять заголовки этих файлов в бровс (с путем).

Как, в принципе, можно решить эту задачу

 Отправлено: 06.05.15 15:37. Заголовок: Попробовал проделать..

Попробовал проделать эту операцию но в буфере увидел
только ссылку на один файл (текущем).
Сам проверь. Пуск - Выполнить - clipbrd.exe
Тоже интересно а где же тогда винда хранит список отмеченных ...

 Отправлено: 06.05.15 16:25. Заголовок: Да проверял уже.. Д..

Да проверял уже..

Думаю засада в формате считываемых из буфера данных

fl:=TActiveX():New(oWnd, "Shell.Explorer.2", 0, 0, 0, 0)
fl:Do("Navigate2", "about:blank")
? pol:=fl:document:parentWindow:clipboardData:getData("text")

вроде нормально. Но это для текстовых данных, а вот для файлов какой-то
другой или буфер не так читаю

 Отправлено: 06.05.15 16:36. Заголовок: похоже надо курить д..

похоже надо курить доку http://www.vsokovikov.narod.ru/New_MSDN_API/Clipboard/ogl_clipbrd.htm

 Отправлено: 06.05.15 17:06. Заголовок: Придется доку. Взял..

Придется доку.

Взял примерчик (в Samples) и пргнал по всем форматам, их 14, ничего не получил.

 Отправлено: 06.05.15 17:31. Заголовок: Посмотри прогу CLCL..

Посмотри прогу CLCL

 Отправлено: 06.05.15 17:41. Заголовок: А можно бросить в ме..

А можно бросить в меня этой прогой CLCL ?

 Отправлено: 06.05.15 17:42. Заголовок: http://www.nakka.com..

 Отправлено: 06.05.15 17:42. Заголовок: http://www.nakka.com..

 Отправлено: 06.05.15 17:44. Заголовок: Dima пишет: Отправл..

Dima пишет:

цитата:

Отправлено: Сегодня 17:42

PSP пишет:

цитата:

Отправлено: Сегодня 17:42

 Отправлено: 06.05.15 17:45. Заголовок: Бывааааает... ))..

Бывааааает... ))

 Отправлено: 06.05.15 17:54. Заголовок: Посvотрел.. обе :sm..

Посvотрел.. обе
Ну да, все определяет как-то. Вот тока как ?

 Отправлено: 06.05.15 18:10. Заголовок: Либо снова курить до..

Либо снова курить доку но более продвинутую , либо найти аналог проги CLCL с сырцами
и курить их , либо подождать мастера , авось заглянет в эту тему ;)

 Отправлено: 26.05.15 16:11. Заголовок: fil Если вопрос реш..

fil
Если вопрос решил , напиши как !

 Отправлено: 26.05.15 17:23. Заголовок: Не решил (руки не до..

Не решил (руки не дошли. Сокет делал), но так понял, что через метод GetAsHandle надо

 Отправлено: 08.06.15 14:44. Заголовок: Dima ты интересовалс..

Dima ты интересовался

function main
local hDrp, fl

if IsClipboardFormatAvailable (15)>0
OpenClipboard (getdesktopwindow())
hDrp:=GetClipboardData(15)

for st=1 to 100
fl:=space(200)
if DragQueryFile (hDrp, st-1, fl, 200)=0
exit
else
? fl
endif
next
endif
return NIL

DLL32 Function IsClipboardFormatAvailable (format AS LONG) AS LONG ;
PASCAL LIB "USER32"

DLL32 Function GetClipboardData (wFormat AS LONG) AS LONG ;
PASCAL LIB "USER32"

DLL32 Function OpenClipboard (hwnd AS LONG) AS LONG PASCAL LIB "USER32"

DLL32 Function DragQueryFile (HDROP AS LONG, UINT AS LONG, lpStr AS STRING, ;
ch AS LONG) AS LONG PASCAL FROM "DragQueryFileA" Lib "shell32.dll"

 Отправлено: 08.06.15 15:10. Заголовок: fil пишет: DLL32 Fu..

fil пишет:

цитата:

DLL32 Function DragQueryFile (HDROP AS LONG, UINT AS LONG, lpStr AS STRING, ; ch AS LONG) AS LONG PASCAL FROM "DragQueryFileA" Lib "shell32.dll"

Юра не могу собрать ;)
Error E0030 Syntax error "syntax error at '-'"

 Отправлено: 08.06.15 15:25. Заголовок: А в чем собираешь, я..

А в чем собираешь, я ведь это под FW делал ?

 Отправлено: 08.06.15 15:25. Заголовок: собираю под Harbour ..

собираю под Harbour + либы hbxpp и xhb

 Отправлено: 08.06.15 15:30. Заголовок: Там, правда, ничего ..

Там, правда, ничего FW'ного нет тока API..

Ошибка только в DragQueryFile ? Попробуй эту строчку переписать вручную

 Отправлено: 08.06.15 15:43. Заголовок: Короче вот из за это..

Короче вот из за этого не собирается UINT AS LONG почему не пойму.
Если это убрать собирается но такой подход не правильный.