![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Динамическая привязка OnConnect в КОНСОЛЬНОМ приложении [D6, Win2k, WinXP]
Kacnep © (2006-07-25 11:29:00)Ругается в назначении события на ОнКоннект.
program Project2;
{$APPTYPE CONSOLE}
uses
SysUtils, IdBaseComponent, IdComponent, IdTCPClient, IdCmdTCPClient, IdCommandHandlers, IdContext;
var
id_Cl:TIdCmdTCPClient;
procedure AfterConnect(AContext: TIdContext);
begin
AContext.Connection.IOHandler.Write(ParamStr(2));
AContext.Connection.Disconnect;
end;
begin
id_Cl:=TIdCmdTCPClient.Create;
id_Cl.OnConnect:=AfterConnect; // ругается не понимает
id_Cl.Connect(ParamStr(0),ParamStr(1));
end.
Kacnep (2006-07-25 11:37:00) [21]Ну у меня как то раньше не возникало проблем с динамическим назначением... :((
А в консольном приложении что то как то призадумался...
Так как исправить ошибку? Можешь подсказать?
Сергей М. (2006-07-25 11:34:00) [22]AfterConnect() должна быть не регулярной процедурой, а процедурным методом любого класса.
Сергей М. (2006-07-25 11:34:00) [23]А причем тут консоль ?