Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

сервер для компонента NMSTRM. [D6, WinXP]

LORD © (2002-11-28 22:04:00)
Господа извените за такой вопрос

но кто является
Во всех примерах указан NMSTRMSERV но он откликается
только на передачу потока, а на передачу буфера не реагирует ни как а клиент вдает сообщение что сервер не найден или типа того.

Буду рад любым исходникам по данной теме .

Digitman (2002-12-03 08:14:00) [1]

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

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

LORD (2002-12-03 00:38:00) [2]
to Digitman

nmstrm1.SendBuffer(@buffer,sizeof(buffer));
так я тоже пробовал результат тотже :
EConvertError+набор крестиков палочек и разной абрыкадабры(кодировка)

P.C.
я выяснил что абракадабра это часть буфера который я передаю.

Digitman (2002-12-02 08:51:00) [3]
читаем хэлп

вот прототип :
procedure SendBuffer(value: PChar; buflen: word);

1-й параметр - УКАЗАТЕЛЬ на буфер !

nmstrm1.SendBuffer(@buffer,sizeof(buffer));

LORD (2002-12-01 21:11:00) [4]
TO Digitman

"192.168.6.166" это мой адрес в местной сетке .Для меня что
127.0.0.1 что 192.168.6.166 что localhost одно и тоже
и ошибка с ними одна и таже
твой код выдает два события: конект на клиенте и на сервере.
при посылке данных от клиента на сервер вылетает мессага EConvertError+набор крестиков палочек и разной абрыкадабры(кодировка)
а при попытке закрыть проект : Socket send aborted

Digitman (2002-12-01 14:40:00) [5]

> "192.168.6.166" посылаю сам себе

Для посылки "самому себе" есть спец.адрес : 127.0.0.1

Что говорит твой клиент в ответ на это :

nmstrm1.Host:="localhost";
nmstrm1.Port:=7777;
nmstrm1.Connect;

???

LORD (2002-12-01 13:49:00) [6]
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-11-29 13:59:00) [7]

> Буду рад любым исходникам по данной теме .

Нет уж, это уж ты будь так любезен привести исх.текст, что ты наваял ... тот который "или типа того")

LORD (2002-11-28 23:06:00) [8]
ну и нагородил ...... это правильный вариант вопроса

Господа извените за такой вопрос

но кто является сервером для компонента NMSTRM
Во всех примерах указан NMSTRMSERV но он откликается
только на передачу потока, а на передачу буфера не реагирует ни как а клиент выдает сообщение что сервер не найден или типа того.

Буду рад любым исходникам по данной теме .

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »