сервер для компонента 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

читаем хэлп

вот прототип :
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.
я выяснил что абракадабра это часть буфера который я передаю.

> абракадабра это часть буфера который я передаю

ну так - что передаешь, то и принимаешь)

сервер для компонента NMSTRM. Найти похожие ветки