ich möchte eine Klasse schreiben die die vfw-Capture Funktionen Kapselt.
Leider scheitere ich schon am constructor
Beim Aufruf von CapCreateWnd erhalte ich eine Schutzverletzung.
So wie ich die Fehlermeldung vertehe, gibt es kein Handle auf meine Klasse/Control.
Müßte das Handle nicht aber nach dem inherited Create zur Verfügung stehen ?
Muß allerdings gestehen, dass das mein erster Versuch ist direkt mit der Win API zu arbeiten, also vermutlich ein Newbie Fehler
Hier meine Klasse (bis jetzt) :
Code: Alles auswählen
unit Media;
{$mode objfpc}{$H+}
interface
uses
Classes, SysUtils, Controls, Windows, vfw, extCtrls, Dialogs;
Type
TVideoCap = Class(TPanel)
private
FCapHandle : HWND;
procedure CreateVWnd;
public
constructor create(aOwner : TComponent); override;
end;
implementation
procedure TVideoCap.CreateVWnd;
begin
FCapHandle:=capCreateCaptureWindow('Video Capture',WS_CHILD or WS_VISIBLE or WS_CLIPCHILDREN or WS_CLIPSIBLINGS,0,0,Width,Height,Handle,1);
end;
constructor TVideoCap.Create(aOwner:TComponent);
begin
inherited create(aOwner);
CreateVWnd;
end;
end.
Beim gleichen Aufruf von CapCreateWnd innerhalb eines Formulars mit dem Handle eines TPanel funktioniert es.
thx
Verein
Links
