Wenn du diesen Code hier unter die anderen SendMessage Aufrufe in dem Codelyb-Code schreibst und die Quelle richtig auswählst, dann sollte es gehen!
Delphi-Quellcode:
const
WM_CAP_DLG_VIDEO_SOURCE = WM_USER + 42;
[..]
SendMessage (capHandle, WM_CAP_DLG_VIDEO_SOURCE, 1, 0);