2014-05-22 22:31:51 +02:00
|
|
|
unit uMainForm;
|
|
|
|
|
|
|
|
interface
|
|
|
|
|
|
|
|
uses
|
|
|
|
Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
|
2014-05-23 20:12:39 +02:00
|
|
|
Vcl.Controls, Vcl.Forms, Vcl.Dialogs, uOCVTypes, uOCVSource, uOCVView, ffm.libavcodec.avcodec;
|
2014-05-22 22:31:51 +02:00
|
|
|
|
|
|
|
type
|
|
|
|
TForm1 = class(TForm)
|
2014-05-23 09:02:53 +02:00
|
|
|
ocvFFMpegIPCamSource1: TocvFFMpegIPCamSource;
|
|
|
|
ocvView1: TocvView;
|
2014-05-22 22:31:51 +02:00
|
|
|
private
|
2014-05-23 20:12:39 +02:00
|
|
|
{Private declarations}
|
2014-05-22 22:31:51 +02:00
|
|
|
public
|
2014-05-23 20:12:39 +02:00
|
|
|
{Public declarations}
|
2014-05-22 22:31:51 +02:00
|
|
|
end;
|
|
|
|
|
|
|
|
var
|
|
|
|
Form1: TForm1;
|
|
|
|
|
|
|
|
implementation
|
|
|
|
|
|
|
|
{$R *.dfm}
|
|
|
|
|
|
|
|
end.
|