Форум: "Сети";
Текущий архив: 2003.01.30;
Скачать: [xml.tar.bz2];
Внизсервер для компонента NMSTRM. Найти похожие ветки
← →
LORD (2002-11-28 22:04) [0]Господа извените за такой вопрос
но кто является
Во всех примерах указан NMSTRMSERV но он откликается
только на передачу потока, а на передачу буфера не реагирует ни как а клиент вдает сообщение что сервер не найден или типа того.
Буду рад любым исходникам по данной теме .
← →
LORD (2002-11-28 23:06) [1]ну и нагородил ...... это правильный вариант вопроса
Господа извените за такой вопрос
но кто является сервером для компонента NMSTRM
Во всех примерах указан NMSTRMSERV но он откликается
только на передачу потока, а на передачу буфера не реагирует ни как а клиент выдает сообщение что сервер не найден или типа того.
Буду рад любым исходникам по данной теме .
← →
Digitman (2002-11-29 13:59) [2]
> Буду рад любым исходникам по данной теме .
Нет уж, это уж ты будь так любезен привести исх.текст, что ты наваял ... тот который "или типа того")
← →
LORD (2002-12-01 13:49) [3]TO Digitman
// ("192.168.6.166" посылаю сам себе )
procedure TForm1.Button1Click(Sender: TObject);
var
buffer:array[0..1024] of char;
begin
nmstrm1.Host:="192.168.6.166";
nmstrm1.Port:=7777;
nmstrm1.Connect;
nmstrm1.SendBuffer(buffer,sizeof(buffer));
end;
//-------------------------------------------------------
procedure TForm1.NMStrmServ1MSG(Sender: TComponent; const sFrom: String;strm: TStream);
var
buffer:array[0..1024] of char;
begin
strm.ReadBuffer(buffer,sizeof(buffer));
end;
← →
Digitman (2002-12-01 14:40) [4]
> "192.168.6.166" посылаю сам себе
Для посылки "самому себе" есть спец.адрес : 127.0.0.1
Что говорит твой клиент в ответ на это :
nmstrm1.Host:="localhost";
nmstrm1.Port:=7777;
nmstrm1.Connect;
???
← →
LORD (2002-12-01 21:11) [5]TO Digitman
"192.168.6.166" это мой адрес в местной сетке .Для меня что
127.0.0.1 что 192.168.6.166 что localhost одно и тоже
и ошибка с ними одна и таже
твой код выдает два события: конект на клиенте и на сервере.
при посылке данных от клиента на сервер вылетает мессага EConvertError+набор крестиков палочек и разной абрыкадабры(кодировка)
а при попытке закрыть проект : Socket send aborted
← →
Digitman (2002-12-02 08:51) [6]читаем хэлп
вот прототип :
procedure SendBuffer(value: PChar; buflen: word);
1-й параметр - УКАЗАТЕЛЬ на буфер !
nmstrm1.SendBuffer(@buffer,sizeof(buffer));
← →
LORD (2002-12-03 00:38) [7]to Digitman
nmstrm1.SendBuffer(@buffer,sizeof(buffer));
так я тоже пробовал результат тотже :
EConvertError+набор крестиков палочек и разной абрыкадабры(кодировка)
P.C.
я выяснил что абракадабра это часть буфера который я передаю.
← →
Digitman (2002-12-03 08:14) [8]
> абракадабра это часть буфера который я передаю
ну так - что передаешь, то и принимаешь)
Страницы: 1 вся ветка
Форум: "Сети";
Текущий архив: 2003.01.30;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.007 c