roboforum.ru

=DeaD= писал(а):

ALS писал(а):... а что не так с дельфи ?

Вы из под Delphi много работали с OpenCV ?
Удобно?

Я - нет, но, вроде, есть https://github.com/Laex/Delphi-OpenCV , https://code.google.com/p/opencv-for-delphi/
Посмотрев/покомпилировав тамошние примеры, можно хотя бы убедиться, насколько оно удобно.
А так, с места в карьер, заявлять "выкинь молоток, посмотри, какой электролобзик..." ?

ALS, подобных проектов как минимум 5, только просто покомпилировав вы не поймёте в чём трудности с делфи. будут танцы с бубном или нет, зависит от того, что именно из цв понадобиться в проекте и реализованно ли это в тех врапперах.

да, согласен, но, предполагаю, что когда говорят о CV, имеют в виду именно распознАвание. Потому что все остальное (управление и просмотр/захват видео) делается быстро и любыми другими (даже "наколенными") способами.
А насколько хорошо это реализовано в тех врапперах, надеюсь, узнаем у ТС в ближайшее вреия

OpenCV (англ. Open Source Computer Vision Library, библиотека компьютерного зрения с открытым исходным кодом) - Пока никто не говорит про комп. зрение. Мне хотелось бы сейчас из своего проекта научится просто управлять..."зрение" будет много - много позже.

Добавлено спустя 11 минут 13 секунд:
Re: Гидропонный робот - сделает звёзды ближе к людям.Вопрос про
Управлять сервами и двигателями

тогда просто добавляете в репозитарий http://sourceforge.net/projects/comport/
дальше в программе ComPort1.WriteStr(str)
протокол управления я брал из самой веб-морды, но, подозреваю, он есть и в описании OR-WRT

Я так понимаю что ComPort1.WriteStr(str) - это библиотека или компонент для работы с ком портом. Но мне ведь нужно управлять удалённым устройством через другой роутер с авторизацией. Дед мне как посылать команды на контроллер не через веб интерфейс...может на форуме уже что-то похожее делал?

ComPort1.WriteStr(str) - это команда, а то, что было по ссылке - компонент.
А... вы точно имеете "большой опыт" в Delphi ? Потому что я сам не программер ни разу, но у меня таких вопросов не возникало.

Это понятно но как послать эту команду не моему порту а удалённому роутеру....Я конечно программист но с такими задачами сталкиваюсь впервые

госспадя, открыл TCP сокет, послал команду, закрыл сокет. Вправду программист чтоле?

Закрывать-то зачем? Один раз открыл и на события процедуры повесил.

госспадя, открыл TCP сокет, послал команду, закрыл сокет. Вправду программист чтоле? - А можешь дать примерчик?

на дельфи - нет. На яве могу, но не сейчас

elmot писал(а):на дельфи - нет. На яве могу, но не сейчас

Неважно на чём, мне нужен пример для "подражания". Тогда когда сможешь....

На WSH:
Вообще - это почтовый клиент, точнее одна процедура.

Код: Выделить всё

Sub Recieve_Mail(MailServer,MailPort_POP3,User,Password,WHERE_WRITE)
    On Error GoTo 0
    CurrentLetter=0
   LogToFile "iMail"&" "&"Перед созданием объекта MSWinsock.Winsock"
    Set Wsock = Wscript.CreateObject("MSWinsock.Winsock", "WsockR_")
    LogToFile "iMail"&" "&"Объект создан..."
    Wsock.Connect MailServer, MailPort_POP3
    STATUS=Wait("Connect_Server")
    If STATUS="Wsock.State=9" Then
       LogToFile "iMail"&" "&"Не подключиться к серверу. " & STATUS
       Exit Sub
    End If
    LogToFile "iMail"&" "&"Подключились к серверу " & MailServer & "..."   
    Wsock_SendData ("USER " & User & vbcrlf)
    Wait "+"
    Wsock_SendData ("PASS " & Password  & vbcrlf)
    Wait "+"
    Wsock_SendData ("STAT"  & vbcrlf)
    Letters=Wait("+")
    Letters=NUM((Mid(Letters,5)))
    If Letters=0 Then
       Wsock_SendData "QUIT" & vbCrLf
       Wsock.Close
       Set Wsock=Nothing
       LogToFile "iMail"&" "&"Писем нет "
       Exit Sub

Интересно а почему изображение на камере при езде мигает ? с этими "артефактами можно что-то сделать?

Добавлено спустя 56 секунд:
Re: Гидропонный робот - сделает звёзды ближе к людям.Вопрос про
Кстати всё ещё жду примера посылки с компьютера на контроллер какой н-ть команды...

Добавлено спустя 2 минуты 30 секунд:
Re: Гидропонный робот - сделает звёзды ближе к людям.Вопрос про
без езды не моргает....т.е. пока камера не двигается...