Nikon SDK für Kamerasteuerung

[chrizl]

Stimmt... Die Kamera wird als "Kamera" erkannt.

Wird also mit dem "Scanner und Kamera"-System von Microsoft angesprochen.
Die Kamera müsste man also über die WIA-Steuerung angesprochen werden.

Dieses Programm kann sowas. Vlt. findet man dazu ja noch einen Codeschnippsel oder so.
http://www.computerbild.de/download/WIA ... 91145.html

Schau mal nach NKRemote usw. Da gibt es auch einen passenden Code für, in dem beschrieben wird, wie man die Bilder von der Kamera bekommt.
Zumindest gibt es den Batch-Code dafür.
Wie gesagt, wenn ich das die Tage noch schaffe, schau ich mal nach und stell dir den Code zur Verfügung. Der müsste dann nur noch angepasst werden.

Sorry.... meinte diesen hier:
http://www.diyphotobits.com/download-di ... a-control/

[Eisbaer]

Inzwischen hat Nikon das SDK etwas erweitert.
https://sdk.nikonimaging.com/apply/

Die neue DLL aus dem Paket heißt: "NkdPTP.dll"
http://pel.hu/down/NkdPTP.dll

Und etwas Software von Gődény Csaba zum Testen der Features:
http://pel.hu/getpage.php?pg=progi&ac=1


Angesprochen wird das über das MAID 3.1 Modul.
http://thomasdideriksen.dk/misc/Code/Ni ... 003(E).pdf


Hab den älteren Code mal auf Version 5.22 LTS x64 angepasst.


ComMate Plus PBV5: (http://www.rsbasic.de/backups/)
http://www.rsbasic.de/backupprogramme/C ... US_PB5.zip

Code: Alles auswählen

IncludePath "..\"
XIncludeFile "COMatePLUS.pbi"


Define WIA_DeviceManager.COMateObject
Define WIA_CommonDialog.COMateObject

WIA_DeviceManager = COMate_CreateObject("WIA.DeviceManager")
If WIA_DeviceManager
  Debug "WIA_DeviceManager-Objekt wurde erfolgreich erstellt."
Else
  Debug "WIA_DeviceManager-Objekt konnte nicht erstellt werden."
  Debug COMate_GetLastErrorDescription()
  End
EndIf

WIA_CommonDialog = COMate_CreateObject("WIA.CommonDialog")
If WIA_CommonDialog
  Debug "WIA_CommonDialog-Objekt wurde erfolgreich erstellt."
Else
  Debug "WIA_CommonDialog-Objekt konnte nicht erstellt werden."
  Debug COMate_GetLastErrorDescription()
  WIA_DeviceManager\Release() ; Objekt wieder freigeben
  End
EndIf

Define dev.COMateObject
 
dev = WIA_CommonDialog\getObjectProperty("ShowSelectDevice")

If dev

  Debug "Selected device: " + dev\GetStringProperty("Properties('Description')\Value")
 
  itemCount = dev\GetIntegerProperty("Items\Count")
 
  Debug "Items: " + Str(itemCount)
 
  dev\Release() ; Objekt freigeben
 
Else
 
  Debug COMate_GetLastErrorDescription()
 
EndIf

WIA_CommonDialog\Release()  ; Objekt freigeben
WIA_DeviceManager\Release() ; Objekt freigeben

Hat hier schon mal jemand weiter gemacht, oder alternativ die neue DLL einbinden können ?