Posted on 2004-08-18
I'm trying to use the indy IRC component to create a simple chat client, but I'm having some weird problems.
I have this code:
procedure TForm1.IRCMessage(Sender: TObject; AUser: TIdIRCUser;
AChannel: TIdIRCChannel; Content: String);
Display1.Lines.Add('--' + PansiChar(AUser) + ': ' + Content); // Display1 is a memo
Using that, this is what I get when some says something on the channel I have it join:
Every nickname is replaced by something like that. I tried using String(AUser) and AnsiString(AUser) too, but they have the same results. I also looked at the indy demos, and I didn't find any examples for the IRC Component, so any help is appreciated.