ImageEn, unit imageenview |
|
TImageEnView.OnDShowEvent
Declaration
property OnDShowEvent: TNotifyEvent;
Description
Occurs when one or more events are ready (when using the DirectShow functionality of TImageEnView).
You should call
IO.
DShowParams.
GetEventCode until it returns false (no more events are available).
procedure Tfmain.ImageEnView1DShowEvent;
var
event: Integer;
begin
while ImageEnView1.IO.DShowParams.GetEventCode(event) do
case event of
IEEC_COMPLETE:
begin
... end of stream!
end;
end;
end;