Реализация протокола пересылки

[Horus92]

Как мне можно в паскале создать порт для пересылки принятия пакетов с типом данных integer???

[raxp]

...если вы имеете ввиду паскаль по дос- ом, то можно к примеру задействовать любой из fossil-драйверов.

[Horus92]

всмысле под доссом? я имею ввиду какой-то протокол пересылки типа http или ftp только для пересылки данных типа integer он существует или можно его как-то реализовать??

[Horus92]

вот _http://www.javaportal.ru/java/articles/java_http_web/article02.html#sampleserver например реализация сервера java а мне надо отправлять и принимать через delphi информацию с этого протокола на ip

[raxp]

delphi ...дело в том, что именно в паскале это несколько затруднительно... да и под словом порт можно понять СOM/LPT/USB порт
idTCPClient или TClientSocket удолетворит вашу потребность в подключении к http-серверу в delphi...

// получение данных-
procedure ClientSocket1Read(Sender: TObject; Socket: TCustomWinSocket);
begin
 get_packet(Socket.ReceiveText) // ваша процедура разбора данных
end;

...
// отправка данных-
ClientSocket1.Socket.SendText(packet) // отправка текста или пакета

[Horus92]

спасибо проверю

[raxp]

для чисел, также удобны методы...

ClientSocket1.Socket.SendBuf(buf, sizeof(buf))

....
procedure TForm1.ClientSocket1Read(Sender: TObject;
  Socket: TCustomWinSocket);
begin
 socket.ReceiveBuf(buf, count)
end;

хотя это не принципиально.

[Horus92]

Я не нашел в delphi 7 компонента ClientSocket в какой вкладке он находиться??

сделал но все равно при посылке пакета ничего не приходит и я ж понял что в clientsocket надо обьявить хост и порт а аdress обьявлять надо??

[raxp]

хост объявлен, ip (аdress) уже не нужен
работа с компонентом clientsocket >>> 1 2