Wer ein Foto oder Video in Windows 8 machen möchte, hat die Qual der Wahl. Entweder man erstellt Oberfläche und Code selber oder man nimmt einen Standard Dialog aus WinRT. Der folgende Code setzt voraus das die Anwendung die Capability Webcam, einzustellen im appxmanifest, besitzt.
Dim dialog = New CameraCaptureUI()
storedFoto = Await dialog.CaptureFileAsync(CameraCaptureUIMode.Photo)
Dim msg As MessageDialog = New MessageDialog(storedFoto.Name)
Await msg.ShowAsync()
Die Bilder werden automatisch im Anwendungsverzeichnis abgelegt.
C:\Users\pre\AppData\Local\Packages\20d2d3c9-68cc-415e-b173-ca571910a20e_89gf582k2a27c\TempState
Auch der Standardsettings Dialog lässt sich mit ein wenig VB.NET Code öffnen. Die statische Klasse CameaOptionsUi funktioniert aber nur mir einem laufenden mediacapture.
Private mc As MediaCapture
..
mc = New MediaCapture()
Await mc.InitializeAsync(mcs)
....
If mc IsNot Nothing Then
CameraOptionsUI.Show(mc)
End If
