получение файлов с фотоаппарата по USB

[vovan123]

Добрый день, утро, вечер, ночь.
Не один день искал решение проблемы в инете, но так и не нашел (((
Имеется написанная на delphi6 программа, которая определяет подключение цифрового фотика и далее сортирует и копирует файлы на комп. пришло время заменить фотик, и тут возникла проблема. Ранее фотики никон подключались в компу как диск, а теперь как устройство, и программно копировать файлы с устройства как ранее не получается.
Кто нить может чего подсказать ????

[Alex11223]

Наверно нужно использовать Media Transfer Protocol (MTP) или Picture Transfer Protocol (PTP)

https://msdn.microsoft.com/en-us/lib...or=-2147217396

[vovan123]

Сообщение от Alex11223

Наверно нужно использовать Media Transfer Protocol (MTP) или Picture Transfer Protocol (PTP)

https://msdn.microsoft.com/en-us/lib...or=-2147217396

это вы так вежливо на фиг послали ??? наверно

[Alex11223]

Не, послал гуглить про MTP и смотреть документацию и примеры как работать с этим в винапи.

[vovan123]

Сообщение от Alex11223

Не, послал гуглить про MTP и смотреть документацию и примеры как работать с этим в винапи.

если вы внимательно читали первый мой пост там написано (Не один день искал решение проблемы в инете, но так и не нашел (((
гуглил, пробовал варианты, не получается, а вы тут опять гуглить посылаете, вместо того чтобы подсказать чо нить умное. Форум для общения и помощи, а не гуглить=(на фиг) посылать

[Alex11223]

Что гуглили-то, что пробовали? Может вы даже не догуглили до MTP. (а может и вообще не MTP нужен, какое устройство?)

Ну и по ссылке выше есть примеры использования, надо только адаптировать под Дельфи. Может быть что-то нагуглится по "Delphi MTP" https://www.google.com/search?q=delphi+mtp

[kutani]

Не один день искал решение проблемы в инете, но так и не нашел (((

я нашел. Держи на пробу https://yadi.sk/d/MgPDw9tuxqUmb

[vovan123]

Сообщение от kutani

я нашел. Держи на пробу https://yadi.sk/d/MgPDw9tuxqUmb

Интересная прога, по крайней мере если бы были исходники то можно что то интересное почерпнуть.
По крайней мере файлы копирует с фотика, правда почему-то с непонятным названием и без расширения, и только в Win7, на XP не работает.

ЗЫ не хочет прога на XP работать, изначально хоть выдавала (Класс не зарегистрирован, ClassID: {0AF10CEC-2ECD-4B92-9581-34F6AE0637F3}) но после установки библиотеки PortableDeviceApi.dll ничего не выдает и не определяет фотик

[vovan123]

что бы было понятно вот кусок кода (E:\DCIM\100NIKON\) - это путь к старому фотику. У нового фотика пути к диску нет, потому что нет диска, а есть устройство, путь до устройства не подходит

// begin //******************** удаление файлов и папок
FDes :='D:\0_KO_GRAF\'+IntToStr(CustomerData.IBTable2.Fields[0].AsInteger)+'\'
+CustomerData.IBTable2.Fields[2].AsString+'\'; // указали новый путь
FSrc:='';
if FindFirst('E:\DCIM\100NIKON\*.*',faAnyFile,SR)=0 then //ищем все файлы
repeat
if ExtractFileExt(SR.Name)='.JPG' then //проверка есть ли файл
begin //// копируем если есть
FSrc:=FSrc+'E:\DCIM\100NIKON\'+SR.Name+#0; //пишем путь
begin //если не нашли добавить

CustomerData.IBTable3.Insert;
CustomerData.IBTable3.Fields[0].AsInteger:=CustomerData.IBTable1.Fields[0].AsInteger;
CustomerData.IBTable3.Fields[1].AsDateTime:=CustomerData.IBTable2.Fields[2].AsDateTime;
CustomerData.IBTable3.Fields[3].AsString:=SR.Name;
CustomerData.IBTable3.Post; //запись в таблицу
end;
end; /// закончили копирование
until FindNext(SR)<>0;
FSrc:=FSrc+#0;
FindClose(SR); //очистка памяти
DoSHFileOp(Handle, FileOpMode[2], FSrc, FDes, false); //2-перенос 0-без удаления
//*********** Копирование файлов и вставка строк в Таб3 закончить
/////////--------------закончили удаление-------------------////////////

[kutani]

По крайней мере файлы копирует с фотика, правда почему-то с непонятным названием и без расширения, и только в Win7, на XP не работает.
...
ЗЫ не хочет прога на XP работать

How to enable MTP in Windows XP (SP3)
How to enable MTP in Windows 7

по крайней мере если бы были исходники то можно что то интересное почерпнуть.

а мне какой с этого интерес? )