Главная страница
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.036 c
14-1091033833
Art_Z
2004-07-28 20:57
2004.08.15
Хочу книгу по железу!


6-1087233176
vic_vm
2004-06-14 21:12
2004.08.15
Чем лучше скачать файл? - вопрос принятия концепции


14-1091103822
aga
2004-07-29 16:23
2004.08.15
DVD Combo LG


1-1091198878
Antonmm
2004-07-30 18:47
2004.08.15
GIF на форме


6-1085922572
Piter
2004-05-30 17:09
2004.08.15
NetMessageBufferSend