Webcam in Delphi?

[himitsu]

Ich hab eigentlich nicht solche Probleme. (allerdings hab ich mir das selber implementiert)

Hab mir jetzt nicht alles angesehn, aber wird das am Ende auch alles sauber geschlossen?
Bei mir sieht das so aus:

Delphi-Quellcode:

//FCaptureWindow := capCreateCaptureWindow(.....


SendMessageE(FCaptureWindow, WM_CAP_SET_PREVIEW,        WPARAM(False), 0, 'WM_CAP_SET_PREVIEW');
SendMessageE(FCaptureWindow, WM_CAP_SET_CALLBACK_ERROR, 0, LPARAM(nil),   'WM_CAP_SET_CALLBACK_ERROR');
SendMessageE(FCaptureWindow, WM_CAP_DRIVER_DISCONNECT,  0, 0,             'WM_CAP_DRIVER_DISCONNECT');
DestroyWindow(FCaptureWindow);
FCaptureWindow := 0;

[add]
SendMessage statt dem SendMessageE (bei mir ist dort noch die Fehlerbehandlung mit drin, welche man natürlich nie vergessen sollte )