Отправить\принять пакет TCPClient

[xkor]

тут http://fursoffers.narod.ru/Packets.htm

[Amorality]

Да вот только там не для дельфи исходники судя по всему, а для С++ , есть где-нить для дельфи?)

[NLObP]

Вот на паскале для делфи, вроде с оллчитса, уже не помню.

[Amorality]

NLObP,
Эти исходники тоже у меня не пашут (ни на абисе ни на яве) Зависает при отправке логина и пароля

Добавлено через 3 минуты
А нет. все ок работает , сейчас поковыряю

[Jes]

прикольная у вас тут дискуссия по изучению работы сокетов
я вот на делфи давно не писал но мне кажеться что с сокетами нужно примерно так работать:
function login;
var
login:TIdTCPClient;
buf:TIdBytes;
val:Byte;
begin
login.Port:=2106;
login.Host:="where.are.you";
login.Connect;
if login.Connected than
with login.Socket
begin
ReadBytes(buf,InputBuffer.Size);
val:=15;
Write(val);
....
end;
end;
тока не говорите что в коде много синтаксических ошибок

[Amorality]

Сообщение от ;13808

тока не говорите что в коде много синтаксических ошибок

Грамматические тоже есть

Сообщение от ;13808

ReadBytes(buf,InputBuffer.Size);
val:=15;
Write(val);

Это немного не поняла, куда ты читаешь и что есть val? куда ты его пишешь?

[Jes]

а так ?
login.Socket.ReadBytes(buf,login.Socket.InputBuffe r.Size);

[Amorality]

NLObP,
Твой исходник кстати не работает на абисе тоже... С явой работает , но конект только со второй попытки ...

Добавлено через 17 часов 26 минут
На этот раз стала делать через вкладку Internet , получилось так:
TCpclient1.ReceiveBuf и так далее(пакеты нормально принимаются в Мемо).
Посмотрела исходники Емулятора, там вообще не понятно как они отправляют .. нету TCPClient .. Как мне пакет теперь отправить то

[PanAm]

А еще наверно можно использовать TClientSocket, но его нет по умолчанию на панели internet (покраней мере в D7) но можно добавить - component->install packages add...
потом в папке bin найти файл dclsockets70.bpl жмем ок, ок
и на закладке internet появляются ClientSocket, ServerSocket

[Amorality]

PanAm,
У них вообще нет этих функций , нету ни Read ни Write , ни Send , ни Recieve , как с пакетами то работать?