XDView.ocx kullanımı

[forumsad]

bir ip kamera aldım
delphi programına XDView.ocx ini install ettim.

aşagıdaki gibi bazı kontrolleri buldum ama resim çekme gibi olayları nasıl çözeceğim bilmiyorum her ocx in komutu farklı
ocx dosyasının içeriğini inceleyebiliyormuyuz

yardımcı olabilecek var mı
saygılarımla


XDView1.Play;
XDView1.Stop;
XDView1.URL:='192.168.1.13';
XDView1.Port:=80;

[forumsad]

5 yıl geçti hala çözemedim ama ilerleme kaydettim

ip kamera ocx ile delphi form içinde görüntü alabiliyorum ama resim capture olayı bit türlü olmuyor bu ocx konusunda sadece 2 sitede bilği var başka hiç bir bilği yok
site-1:http://www.codenewsfast.com/cnf/article ... rk.7405229
site-2:ftp://92.247.81.210/FTP/Other/OLD_Data/ ... ew_4.7.htm

kamerayı açma kodu: çalışıyor

Kod: Tümünü seç

procedure TForm1.Button1Click(Sender: TObject);
begin
XDView1.URL:='192.168.1.32';
XDView1.Port:=5000;
XDView1.UserName:='admin';
XDView1.UserPswd:='admin';
XDView1.ChannelNum:='0';
XDView1.StartView;
end;

resim alma kodu bir çok deneme yaptım ama başarılı olamadım
resim yolunu değiştiremedim.

Kod: Tümünü seç

procedure TForm1.Button2Click(Sender: TObject);
var
yol:string;
x:WideString;
begin
//XDView1.SetCapPath('c:\') ;
//XDView1.CaptureChannel(0);
//XDView1.ChannelCapture(0);
//XDView1.SetCapPath('c:\') ;
//showmessage(XDView1.GetCapPath());
yol:='c:\anprimages\a.jpg';
XDView1.SetCapPath(yol);
x:=XDView1.GetCapPath();
showmessage(x);
//XDView1.ChannelCapture(0);

//XDView1.ChannelCapture(1); // bTips=0 sorma,bTips=1 sor
end;

saygılarımla