| Author |
 Topic  |
|
|
Paruyr
Canada
14 Posts |
 Posted - Nov 19 2012 : 07:23:17
|
Hello
imageen 4.1.0
Delphi 7
We are having problem with s-video connection when try to show the video coming in from the camera connected to our computer with s-video cable. We use TImageenview component. When we try to switch to that s-video source it hangs and then the whole system crashes ad computer starts rebooting.
The same thing happens when we try the demo applications which come with imnageen installation.
Can anyone advice please ?
Thank you,
Paruyr.
Paruyr |
|
|
Ronald
Netherlands
17 Posts |
|
|
fab
1310 Posts |
Posted - Nov 23 2012 : 10:49:43
|
| How do you switch to the s-video source? Are you using DirectShow examples? |
 |
|
|
Paruyr
Canada
14 Posts |
Posted - Nov 26 2012 : 07:33:03
|
I am getting the list using ...IO.DShowParams.VideoInputs
and then ...IO.DShowParams.SetVideoInput to setup the input.
Paruyr |
|
|
|
fab
1310 Posts |
Posted - Dec 03 2012 : 00:44:00
|
| Please could you post the code? |
|
|
|
Paruyr
Canada
14 Posts |
Posted - Dec 03 2012 : 12:16:14
|
Thank you for helping me, fabrizio
here is the code:
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, ieview, imageenview;
type
TForm1 = class(TForm)
ImageEnView1: TImageEnView;
ComboBox1: TComboBox;
Button1: TButton;
Button2: TButton;
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
procedure ImageEnView1DShowNewFrame(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
begin
{ load video input list }
combobox1.items := imageenview1.IO.DShowParams.VideoInputs;
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
{ activate vidoe for selected surce }
imageenview1.IO.DShowParams.Disconnect;
imageenview1.IO.DShowParams.SetVideoInput(combobox1.itemindex);
imageenview1.IO.DShowParams.EnableSampleGrabber := true;
imageenview1.IO.DShowParams.RenderAudio := true;
imageenview1.IO.DShowParams.Connect;
imageenview1.IO.DShowParams.Run;
end;
procedure TForm1.ImageEnView1DShowNewFrame(Sender: TObject);
begin
{show frame }
with (Sender as timageenview)
do begin
IO.DShowParams.GetSample(IEBitmap);
Update;
end;
end;
end.
Paruyr |
|
|
|
fab
1310 Posts |
Posted - Dec 14 2012 : 04:10:52
|
Hi,
first parameter of SetVideoInput should be the capture card. The second (optional) parameter specifies the actual input of that card. Please try to execute:
imageenview1.IO.DShowParams.SetVideoInput(combobox1.itemindex, 1);
or
imageenview1.IO.DShowParams.SetVideoInput(combobox1.itemindex, 2);
etc... |
|
|
| |
Topic |
|
|
|
Search
problems with s-video connection
