Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Потрепаться";
Текущий архив: 2003.07.14;
Скачать: [xml.tar.bz2];

Вниз

Socket Error   Найти похожие ветки 

 
MTS   (2003-06-25 11:30) [0]

Раньше я использовал Delphi 5 и учился работать с сокетами. Все нормально работало. Сейчас поставил себе Дельфи 6, запускаю тарые уроки а они не работают. Думаю что я что-то там нахимичил. Беру учебник снова пробую переписать .... - все равно не работают. Дошло до того, что я поставил себе дельфи 7 и все равно таже ошибка.
А пишет он следующее:

Project NNN.exe raised exception class ESocketError with message "Windows socket error: запрос на отправку или получение данных (when sending on a datagram socket using a sendto call) no address was suplied (10057)? on API "recv". Process stopped. Use stop or ran to continue.

Как мне с этим боросться?


 
Digitman   (2003-06-25 14:48) [1]

сейчас будем гадать)... телепатически) ...что ты там в коде своем понаделал)


 
MTS   (2003-06-25 23:17) [2]

В настройках "сервера" указываю:
Port = 1122

В настройках клиента указываю:
Address = 127.0.0.1
Port = 1122
Host = localhost




unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, ScktComp, StdCtrls;

type
TForm1 = class(TForm)
Button1: TButton;
ClientSocket1: TClientSocket;
ServerSocket1: TServerSocket;
procedure Button1Click(Sender: TObject);
procedure FormCreate(Sender: TObject);
procedure ServerSocket1ClientWrite(Sender: TObject;
Socket: TCustomWinSocket);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
ClientSocket1.Socket.SendText("test") ;
end;

procedure TForm1.FormCreate(Sender: TObject);
begin

ServerSocket1.Active := TRUE ;
ClientSocket1.Active := TRUE ;

end;

procedure TForm1.ServerSocket1ClientWrite(Sender: TObject;
Socket: TCustomWinSocket);
begin
ShowMessage(ServerSocket1.Socket.ReceiveText) ;
end;

end.


 
Мазут Береговой   (2003-06-26 10:27) [3]

Не уверен, но кажется вот эта строчка "Host = localhost" в клиенте не нужна. И потом надо указать синхронизированный или нет. Они работают по разному.


 
MTS   (2003-06-26 12:18) [4]

Проблемма в том, что на счет синхронизации у меня все одинаково.
А с хостом все в порядке.
Что самое интересное беру приложение переношу на другую машину где стоит дельфи 5 .... там все нормально работает, а на машине где есть д6 или д7 она не пашет! Причем на какой бы то не было машине она не запускалась бы, где есть д6 или д7 она не идет, а под д5 работает!!!! Катастрофа, что мне делать???



Страницы: 1 вся ветка

Форум: "Потрепаться";
Текущий архив: 2003.07.14;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.011 c
3-44598
ruslan_as
2003-06-21 11:13
2003.07.14
Структура базы InterBase


14-44903
vidiv
2003-06-27 11:14
2003.07.14
Вобщем Код и эффект!


1-44654
Viktor
2003-07-02 12:28
2003.07.14
Как отследить нажатие Esc?


1-44716
Sharik_212
2003-06-30 19:22
2003.07.14
Помогите перевести из BP7, пожалуйста!


3-44549
Max_
2003-06-18 19:39
2003.07.14
Счётчик для TQuery.Last???





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский