Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

TServerSocket ;в unit [D6, Win2k]


nikulin ©   (2002-04-17 16:02:00) 

Надо засунуть TServerSocket в модуль. Я обьявил переменную

sctServer :TServerSocket;

создал экземпляр в части initialization

sctServer:=TServerSocket.Create(nil);

А как работать с событиями OnConnect и OnClientRead?

Помогите пожалуйста!


Digitman   (2002-04-18 10:38:00) [1]

Вот твоя ошибка :

[Error] uWorkWithAbonent.pas(176): Incompatible types: "method pointer and regular procedure"

выделяешь ее в окне сообщений компилятора, жмешь F1 и читай, о чем идет речь.

Обращайся).
Координаты - в моей инфе (жми копирайт рядом с моим НИКом)


nikulin   (2002-04-18 09:26:00) [2]

Большое спасибо вроде получилось
А где вот про это прочитать можно

> Обработчиком должен быть метод объекта, а не обычная процедура

И если еще вопросы будут нельзя ли как-нибудь напрямую обратиться ?

С Уважением к Вам
Никулин Андрей mailto:mnews@ucc.ru
ICQ# 156747019


Digitman   (2002-04-18 08:17:00) [3]

>nikulin
Обработчиком должен быть метод объекта, а не обычная процедура

procedure TSomeObject.ClientRead(Sender: TObject; Socket: TCustomWinSocket);


nikulin   (2002-04-17 18:11:00) [4]

Так я так пробовал.

Описал в implementation
procedure ClientRead(Sender: TObject; Socket: TCustomWinSocket);
begin
end;

И в initialization написал:

sctServer:=TServerSocket.Create(nil);
sctServer.OnClientRead:=ClientRead;

У меня ошибка такая:
[Error] uWorkWithAbonent.pas(176): Incompatible types: "method pointer and regular procedure"


Donal_Graeme   (2002-04-17 16:50:00) [5]

просто.

пишешь функции обработчики, и цепляешь их к сокету -

sctServer.OnConnect := myOnConnect;
sctServer.OnClientRead := myOnClientRead;

форматы функций (какие там параметры должны быть) смотри в хэлпе на OnConnect и OnClientRead


Наверх

Титульная страница Поиск, карта сайта Написать письмо