
08.03.2009, 18:05
|
|
Познающий
Регистрация: 19.08.2008
Сообщений: 69
Провел на форуме: 458484
Репутация:
31
|
|
program icqsend;
uses
Windows, sysutils, ICQClient;
{$R *.res}
procedure ewq;
begin
end;
procedure qwe;
begin
end;
procedure FormCreate;
var ICQClient: TICQClient;
begin
ICQClient:= TICQClient.Create(nil);
ICQClient.DisableDirectConnections:= True;
ICQClient.ICQServer:= 'login.icq.com';
ICQClient.ICQPort:= 5190;
ICQClient.UIN:= StrToIntDef(Trim('438***043'), 0);
ICQClient.Password := Trim('XC****DI');
ICQClient.OnLogin:= qwe; +++++
ICQClient.OnMessageRecv:= ewq; +++++
ICQClient.Login();
end;
begin
end.
Пишу прогу которая просто при запуске законектится к аське и отправит сообщение
Но непойму как задать процедуру ОнЛогин и онмессаджРесерв Компилятор постоянно ругается на то место где я поставил +++++ Ошибка Incompatible types: 'method pointer and regular procedure'
До этого собирал все с формой работало отлично А сейчас ппц
|
|
|