Re: Библиотеки
Вложений: 2
Пробуйте.
|
Re: Библиотеки
Возник вопрос такого плана:
1. При открытии сокета обмен данніми в асинхронном режиме?.. 2. Немного не понял, как записывать данные в сокет для отправки... Через ИнпутСтрим?.. |
Re: Библиотеки
1. есть ли что на приеме можно запросить, а отправка в любой момент.
2. пишет побайтно. если надо строку, могу сделать |
Re: Библиотеки
program Menu;
uses socket; var s: string; b : integer; begin if socket.open('socket://mrim.mail.ru:2042')<>0 then Debug('Error'); while socket.available=0 do begin delay(100); end; b := 33; while (socket.available<>0) or (b>32) do begin b := socket.read; s := s + chr(b); end; DrawText(s, 0, 0); repaint; delay(5000); end. |
Re: Библиотеки
pilgrim, уважаемый, а библиотека работает по протоколу UDP или TCP/IP ?
Бибилиотека использует протокол tcp. (Piligrim) |
Re: Библиотеки
Цитата:
socket.open('socket://...') выдает код ошибки -1. При этом сам телефон даже не выдает запрос на разрешение доступа к сети передачи данных. Что это может быть? Телефон настроен как надо, и все остальные Интернет-приложения работают :) |
Re: Lib_socket
А можно таки реализовать поддержку отправки строки в вышеуказанной библиотеке?..
|
Re: Lib_socket
Вложений: 2
C отправкой строк и количеством принятой/отправленой инфы.
|
Re: Lib_socket
Вложений: 2
чтото не хочет отправлять почту через сокет смтп, можете глянуть что не так.. ?
|
Re: Lib_socket
Вложений: 2
ну еще бы хотел ))))))
во первых: где символ перевода каретки? и что за \r\n? меняем везде SendState:= Socket.WriteStr('HELO there\r\n'); на SendState:= Socket.WriteStr('helo there' + chr(10)); во вторых: где чтение и анализ ответа сервера или хотя бы простые задержки между командами? добавляем где надо Delay(2000); while Socket.Available > 0 do RecvString:= RecvString + Chr(Socket.Read); ну и в третьих и четвертых: на сервере может быть авторизация. и у тебя на внешнем шлюзе может быть закрыт 25 порт во избежание. вобщем лови пример, код конечно ужасный, но у меня в локалке с локальным почтовиком все работает. |
Re: Lib_socket
А можно с помощъю этой либы подключаться к серверу по IP-адресу не в локальной сети, а в интернет?
|
Re: Lib_socket
Конечно можно. Не совсем понимаю о чем идет речь. чем IP адрес локальной сети отличается от интернет?
|
Re: Lib_socket
Я просто не правильно выразился.
Суть состоит в том, чтобы подключиться к удаленной машине на определенный порт. На компе запущена программа, которая прослушивает этот порт(сокет в асинхронном режиме). Мидлет должен подключиться к компу, передать ему данные и закрыть соединение. Код:
Хотя судя по логу MIDWay ошибок нет: Код:
AMS: VM_APPLICATION_STATE_CHANGED, 0 |
Re: Lib_socket
судя по логу, собственно соединение устанавливается, но ничего не прилетает. Может сервер буферирует отправку?
|
Re: Lib_socket
Цитата:
|
Часовой пояс GMT +4, время: 02:54. |
vBulletin® Version 3.6.5.
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Перевод: zCarot