IRC w Indy.

0

Witam!
Mam taki problem, poniewz chcialem zrobic program do komunikacji za pomoca kanalu irca, sciagnalem, zainstalowalem i sprobowalem wykorzystac w tym celu komponent Indy, ale mam problemy. Chcialem mianowicie, aby program polaczyl sie, wszedl na kanal i odbieral oraz wysylal wiadomosci. naprawde, nic wiecej. I zrobilem tak:

procedure TForm1.IrcMessage(Sender: TObject; AUser: TIdIRCUser;
AChannel: TIdIRCChannel; Content: String);
begin
memo1.Lines.Add(auser.Nick+': '+content);
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
irc.Nick:= edit1.Text;
irc.AltNick:= edit2.Text;
irc.RealName:= edit3.Text;
irc.Host:= edit4.Text;
irc.Port:= strtoint(edit5.Text);
//irc.BoundIP:= edit7.Text;
//irc.BoundPort:= edit8.Text;
irc.Password:= edit9.Text;
irc.Connect(0);
irc.Join(edit6.Text);
end;

Linijki z bound portem i bound ip zmienilem w komentarz, bo nie wiem, do czego to sluzy :-) Byc moze wlasnie to jest moj problem, ale watpie.

Bardzo prosze i z gory dziekuje za jakakolwiek pomoc.

0

próbuj irc.connect; (połączenie) i irc.disconnect; (rozłączanie) potem po połączeniu zrób button najlepiej inputquery... blabla poprustu irc.join('Kanał'); ;-)

0

Ja mam ten sam probelm. Dałem w osobny button IRC.JOIN ('#kanal',''); a w procedurze onJoined dałem ShowMessage i nie pokazuje tej wiadomości, więc obstawiam, że nie chce się połączyć z kanałem i nadal nie wiem dlaczego ;\

1 użytkowników online, w tym zalogowanych: 0, gości: 1, botów: 0