On-line: гостей 0. Всего: 0 [подробнее..]
АвторСообщение



Пост N: 310
Зарегистрирован: 17.06.10
ссылка на сообщение  Отправлено: 06.05.15 10:58. Заголовок: Список файлов


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

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

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


Спасибо: 0 
ПрофильЦитата Ответить
Ответов - 30 , стр: 1 2 All [только новые]


администратор




Пост N: 4790
Зарегистрирован: 17.05.05
ссылка на сообщение  Отправлено: 06.05.15 15:37. Заголовок: Попробовал проделать..


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

Спасибо: 0 
ПрофильЦитата Ответить



Пост N: 311
Зарегистрирован: 17.06.10
ссылка на сообщение  Отправлено: 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")

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


Спасибо: 0 
ПрофильЦитата Ответить
администратор




Пост N: 4791
Зарегистрирован: 17.05.05
ссылка на сообщение  Отправлено: 06.05.15 16:36. Заголовок: похоже надо курить д..

Спасибо: 0 
ПрофильЦитата Ответить



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


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

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

Спасибо: 0 
ПрофильЦитата Ответить
постоянный участник


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


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

Спасибо: 0 
ПрофильЦитата Ответить



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


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


Спасибо: 0 
ПрофильЦитата Ответить
администратор




Пост N: 4793
Зарегистрирован: 17.05.05
ссылка на сообщение  Отправлено: 06.05.15 17:42. Заголовок: http://www.nakka.com..

Спасибо: 0 
ПрофильЦитата Ответить
постоянный участник


Пост N: 1062
Зарегистрирован: 27.01.07
ссылка на сообщение  Отправлено: 06.05.15 17:42. Заголовок: http://www.nakka.com..

Спасибо: 0 
ПрофильЦитата Ответить
администратор




Пост N: 4794
Зарегистрирован: 17.05.05
ссылка на сообщение  Отправлено: 06.05.15 17:44. Заголовок: Dima пишет: Отправл..


Dima пишет:

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



PSP пишет:

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





Спасибо: 0 
ПрофильЦитата Ответить
постоянный участник


Пост N: 1063
Зарегистрирован: 27.01.07
ссылка на сообщение  Отправлено: 06.05.15 17:45. Заголовок: Бывааааает... ))..


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

Спасибо: 0 
ПрофильЦитата Ответить



Пост N: 314
Зарегистрирован: 17.06.10
ссылка на сообщение  Отправлено: 06.05.15 17:54. Заголовок: Посvотрел.. обе :sm..


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

Спасибо: 0 
ПрофильЦитата Ответить
администратор




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


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

Спасибо: 0 
ПрофильЦитата Ответить
администратор




Пост N: 4842
Зарегистрирован: 17.05.05
ссылка на сообщение  Отправлено: 26.05.15 16:11. Заголовок: fil Если вопрос реш..


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

Спасибо: 0 
ПрофильЦитата Ответить



Пост N: 330
Зарегистрирован: 17.06.10
ссылка на сообщение  Отправлено: 26.05.15 17:23. Заголовок: Не решил (руки не до..


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

Спасибо: 0 
ПрофильЦитата Ответить



Пост N: 338
Зарегистрирован: 17.06.10
ссылка на сообщение  Отправлено: 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"


Спасибо: 0 
ПрофильЦитата Ответить
администратор




Пост N: 4879
Зарегистрирован: 17.05.05
ссылка на сообщение  Отправлено: 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 '-'"

Спасибо: 0 
ПрофильЦитата Ответить



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


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

Спасибо: 0 
ПрофильЦитата Ответить
администратор




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


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

Спасибо: 0 
ПрофильЦитата Ответить



Пост N: 340
Зарегистрирован: 17.06.10
ссылка на сообщение  Отправлено: 08.06.15 15:30. Заголовок: Там, правда, ничего ..


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

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

Спасибо: 0 
ПрофильЦитата Ответить
администратор




Пост N: 4881
Зарегистрирован: 17.05.05
ссылка на сообщение  Отправлено: 08.06.15 15:43. Заголовок: Короче вот из за это..


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

Спасибо: 0 
ПрофильЦитата Ответить
Ответов - 30 , стр: 1 2 All [только новые]
Ответ:
1 2 3 4 5 6 7 8 9
большой шрифт малый шрифт надстрочный подстрочный заголовок большой заголовок видео с youtube.com картинка из интернета картинка с компьютера ссылка файл с компьютера русская клавиатура транслитератор  цитата  кавычки моноширинный шрифт моноширинный шрифт горизонтальная линия отступ точка LI бегущая строка оффтопик свернутый текст

показывать это сообщение только модераторам
не делать ссылки активными
Имя, пароль:      зарегистрироваться    
Тему читают:
- участник сейчас на форуме
- участник вне форума
Все даты в формате GMT  3 час. Хитов сегодня: 102
Права: смайлы да, картинки да, шрифты да, голосования нет
аватары да, автозамена ссылок вкл, премодерация откл, правка нет