| T O P I C R E V I E W |
| AndyColmes |
Posted - Nov 12 2011 : 07:00:35
I am studying the Motion Detection demo and I was wondering if I could use a TImageEnVect and only detect motion defined in a IEBOX object. Please advise.
Thanks. |
| 2 L A T E S T R E P L I E S (Newest First) |
| AndyColmes |
Posted - Nov 15 2011 : 09:58:43
Thanks very much Klaus. I will give it a try. |
| klausdoege |
Posted - Nov 14 2011 : 09:56:36
Hello,
show the change in procedure Tfmain.ImageEnView1DShowNewFrame, it works fine.
1. Make a selection in Imageenview1
2. Change Buffer0.AssignImage(ImageEnView1.IEBitmap);
in Imageenview1.CopySelectionToIEBitmap(buffer0);
For Buffer1 make the same, show down.
ready
procedure Tfmain.ImageEnView1DShowNewFrame(Sender: TObject);
var
diff: double;
ss: string;
begin
ImageEnView1.IO.DShowParams.GetSample(ImageEnView1.IEBitmap);
case current of
-1: // first time
begin
imageenview1.CopySelectionToIEBitmap(buffer0);
imageenview1.CopySelectionToIEBitmap(buffer1);
// Buffer0.AssignImage(ImageEnView1.IEBitmap);
// Buffer1.AssignImage(ImageEnView1.IEBitmap);
current := 0;
end;
0:
begin
imageenview1.CopySelectionToIEBitmap(buffer0);
// Buffer0.AssignImage(ImageEnView1.IEBitmap);
current := 1;
end;
1:
begin
imageenview1.CopySelectionToIEBitmap(buffer1);
// Buffer1.AssignImage(ImageEnView1.IEBitmap);
current := 0;
end;
end;
Klaus |
Search
