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;
XDView.ocx kullanımı
Forum kuralları
Forum kurallarını okuyup, uyunuz!
Forum kurallarını okuyup, uyunuz!
Re: XDView.ocx kullanımı
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
resim alma kodu bir çok deneme yaptım ama başarılı olamadım
resim yolunu değiştiremedim.
saygılarımla
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;