TIDIRC

← →
Pazitron_Brain © (2006-05-01 19:25) [0]

Скажите, как с помощью этого компонента (входит в состав Indy) вывести в Memo сообщения ChanServ"а?

← →
Pazitron_Brain © (2006-05-01 19:31) [1]

И как можно отправить сообщение на канал?
Пишу irc.say(edit1.text); а он пишет: Not enough actual parameters

← →
VirEx © (2006-05-01 21:44) [2]

системные сообщения:
procedure TForm1.IdIRC1System(Sender: TObject; AUser: TIdIRCUser;
ACmdCode: Integer; ACommand, AContent: String);
begin
Memo1.Lines.Add(AContent);
end;

← →
Pazitron_Brain © (2006-05-02 13:56) [3]

А как отправить сообщение на канал?

Все, научился.

← →
Керт (2006-05-19 10:05) [5]

idIRC1.Say("#channel","some text");

Например:
procedure TForm1.idIRC1Part(Sender: TObject; AUser: TIdIRCUser;
AChannel: TIdIRCChannel);
begin
Form1.IRC1.Say("#fantasy",string(AUser.Nick)+" вышел.");
end;

Это чтобы другие поняли )

TIDIRC Найти похожие ветки