Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.08.15;
Скачать: CL | DM;

Вниз

Как создать TCPServer в Runtime?   Найти похожие ветки 

 
anton.   (2004-06-17 10:11) [0]

var
 TCPServer: TIdTCPServer;
 TCPClient: TIdTCPClient;

implementation

procedure TCPServerExecute(AThread: TIdPeerThread);
begin
 TIdPeerThread(TCPServer.Threads.LockList.Items[0]).Connection.WriteLn("k");
end;

initialization
 TCPServer:=TidTCPServer.Create(nil);
 TCPServer.DefaultPort:=1209;
 TCPServer.OnExecute:=TCPServerExecute; << error
 TCPServer.Active:=true;


 
Reindeer Moss Eater ©   (2004-06-17 10:13) [1]

OnExecute : procedure(AThread: TIdPeerThread) of object;


 
anton.   (2004-06-17 10:21) [2]

пока не понял

ошибка
Incompatible types: "method pointer and regular procedure"


 
Reindeer Moss Eater ©   (2004-06-17 10:35) [3]

понимай пока


 
Anatoly Podgoretsky ©   (2004-06-17 11:06) [4]

anton.   (17.06.04 10:21) [2]
Словарь поможет, всего 5 простых слов.



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

Текущий архив: 2004.08.15;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.022 c
14-1091016286
Vlad Oshin
2004-07-28 16:04
2004.08.15
Край березового ситца. Рассказ.


8-1085611549
Net
2004-05-27 02:45
2004.08.15
Видио или не видио???


14-1091151858
Думкин
2004-07-30 05:44
2004.08.15
С днем рождения! 30 июля


14-1091111764
eRoR_rrr
2004-07-29 18:36
2004.08.15
Исходники демок


14-1091029810
DeadMeat
2004-07-28 19:50
2004.08.15
Сетка с WinXP и другими...