indy irc|topic-edit geräusch-OP

[Matrix Scripter]

Hi!
Ich schreib auch gerade nen kleinen irc client mit hilfe der indys..

Mein Problem ist, dass das Topic nicht angezeigt wird. und ich hab ka wieso :/
Hier der Code:

Delphi-Quellcode:

procedure TForm1.IdIRCJoined(Sender: TObject; AChannel: TIdIRCChannel);
begin
  MeChat.Lines.Add('Sie haben ' + Channel + ' betreten');
  if (AChannel.Topic<>'') then
  begin
    MeChat.Lines.Add('Thema ist: '+AChannel.Topic);
    EdtTopic.Text := AChannel.Topic;
  end;
end;

Außerdem hab ich nen Edit das sobald auf enter gedrückt wird den Text der drin ist abschickt. Jedoch kommt da immer noch so ein komisches "beep". Kann man das irgendwie abstellen?

Und außerdem wird nicht angezeigt ob ein User OP/voice ist:

Delphi-Quellcode:

procedure TForm1.IdIRCNames(Sender: TObject; AUsers: TIdIRCUsers;
  AChannel: TIdIRCChannel);
var i : integer;
begin
  for i := 0 to idIRC.Users.Count-1 do
  begin
    if idIRC.IsOp(idIRC.Users.Items[i].Nick) then
      LBNicks.Items.Add('@'+idIRC.Users.Items[i].Nick)
    else
    begin
      if idIRC.IsVoice(idIRC.Users.Items[i].Nick)then
        LBNicks.Items.Add('+'+idIRC.Users.Items[i].Nick)
      else
        LBNicks.Items.Add(idIRC.Users.Items[i].Nick);
    end;
  end;
end;

(Benutze indy9, Delphi 2005 Personal)

Hoffe mir kann jemand helfen
mfG MatrixScripter