Главная страница
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
8-1086099708
Alex_F
2004-06-01 18:21
2004.08.15
Поддержка AVI


6-1087143199
KingDown
2004-06-13 20:13
2004.08.15
Получение кода страницы...


3-1090241722
Григорьев Антон
2004-07-19 16:55
2004.08.15
Формат хранения данных в БД


4-1088416870
vertal
2004-06-28 14:01
2004.08.15
Передача управления другой программе без возврата


1-1091309178
Ricks
2004-08-01 01:26
2004.08.15
Dump памяти программы