На главную Наши проекты:
Журнал   ·   Discuz!ML   ·   Wiki   ·   DRKB   ·   Помощь проекту
ПРАВИЛА FAQ Помощь Участники Календарь Избранное RSS
msm.ru
! Соблюдайте общие правила форума
Пожалуйста, выделяйте текст программы тегом [сode=pas] ... [/сode]. Для этого используйте кнопку [code=pas] в форме ответа или комбобокс, если нужно вставить код на языке, отличном от Дельфи/Паскаля.
Указывайте точные версии Delphi и используемых сетевых библиотек.

Не приветствуется поднятие старых тем. Если ваш вопрос перекликается со старой темой, то для вопроса лучше создать новую тему, а старую указать в первом сообщении с описанием взаимосвязи.

Внимание:
попытки открытия обсуждений реализации вредоносного ПО, включая различные интерпретации спам-ботов, наказывается предупреждением на 30 дней.
Повторная попытка - 60 дней. Последующие попытки бан.
Мат в разделе - бан на три месяца...

Полезные ссылки:
user posted image MSDN Library user posted image FAQ раздела user posted image Поиск по разделу user posted image Как правильно задавать вопросы


Выразить свое отношение к модераторам раздела можно здесь: user posted image Krid, user posted image Rouse_

Модераторы: Krid, Rouse_
Страницы: (3) 1 2 [3]  все  ( Перейти к последнему сообщению )  
> интерфейс RTSP(554)
    Написал на ПАЙТОНЕ, тоже не работает именно с этой камерой.
    172.16.42.12:554 - пашет
    172.16.42.11:554 - не пашет

    ExpandedWrap disabled
      import cv2
      from tkinter import *
      from tkinter import messagebox
       
      cap = cv2.VideoCapture('rtsp://admin:admin@172.16.42.12:554/cam/realmonitor?channel=1&subtype=0')
       
      while True:
          ret, img = cap.read()
          gray = cv2.cvtColor(img, cv2.COLOR_BGR2GRAY)
          img=cv2.resize(img,(800,600))
          cv2.imshow('IP Camera stream', img)
       
       
          if cv2.waitKey(1) & 0xFF == ord('s'):
              cv2.imwrite('c:\Python\images.jpg', img)
              
          if cv2.waitKey(1) & 0xFF == ord('q'):
              break
       
       
      cv2.destroyAllWindows()


    Добавлено
    есть прогресс.......
    В пайтоне заработал первый поток, нулевой НЕ ХОЧЕТ
    ПАШЕТ = cap = cv2.VideoCapture('rtsp://admin:admin@172.16.42.11:554/1')
    НЕ ПАШЕТ = cap = cv2.VideoCapture('rtsp://admin:admin@172.16.42.11:554/0')
    (прошу прощения за НЕ ДЕЛФИ язык, но приходиться извращаться для достижения цели)
    Подсказку нашел на этом сайте: https://www.ispyconnect.com/camera/herospeed
      Ураааааааааааааааааа, нулевой поток ожил.
      Нужно было в настройках камеры указать в разделе:
      Конфигурация-Видео-Видео-Видеокодирование
      стоял параметр: MJPEG
      нужно было поставить: H.264 и разрешение поставил максимальное
      ЗАРАБОТАЛО !
      (Но в Пайтоне)
        DELPHI - заработало:
        edit1.Text:='http://admin:admin@172.16.42.11:8080/snap.jpg%27;


        ExpandedWrap disabled
          procedure TForm1.BitBtn1Click(Sender: TObject);
          begin
                memorystream.Clear;
                try
                    NetHTTPClient1.Get (edit1.Text, memorystream);
                    memorystream.SaveToFile('A_Teste.jpeg');
                except
                        on E: Exception do
                        begin
                                Error:=e.ToString();
                                showmessage(' Ошибка= '+Error);
                        end;
                end;
          end;
           
           
           
          procedure TForm1.FormCreate(Sender: TObject);
          begin
              memorystream:=TMemoryStream.Create;
              Jpeg:=TJpegImage.create;
              edit1.Text:='http://admin:admin@172.16.42.11:8080/snap.jpg';
          end;
          Судя по всему, скачать пример из темы оказалось сложнее чем яндексить варианты на питоне.
          Ваш путь - это одноразовый путь.
          Если вы не разберётесь с RTSP, то плата за подход "как бы сделать так, чтобы ничего не делать" - это открытки и высокий траффик
          Сообщение отредактировано: Lem0nti -
          0 пользователей читают эту тему (0 гостей и 0 скрытых пользователей)
          0 пользователей:
          Страницы: (3) 1 2 [3]  все


          Рейтинг@Mail.ru
          [ Script execution time: 0,0281 ]   [ 16 queries used ]   [ Generated: 28.03.24, 08:26 GMT ]