Como usar o IdIrc do D7

16/03/2006

Oii Pessoal...
Estou querendo montar um cliente de irc apenas por motivos d estudos...
non achei nenhum demo do delphi e na net non achei mta coisa sobre isso...

o basico eu consegui..

aqui eu configuro o username, bla bla bla e mando conectar
  IdIRC1.Username := edit1.Text;
  IdIRC1.RealName := edit2.text;
  IdIRC1.Host := edit3.Text;
  IdIRC1.Password := Edit4.Text;
  IdIRC1.Port := StrToInt(Edit5.text);
  IdIRC1.Connect(0);


aqui eu entro num canal
  //entra no canal
  idIRC1.Join(edit6.Text,´´);

aqui eu pego os nomes dos usuarios no canal, jah adicionando alguns tags nos nicks
  //copia os nicks dos usuarios num list box
  for i:=0 to idIRC1.Users.Count-1 do begin
   If idIRC1.IsOp(idIRC1.Users.Items[i&93;.Nick) then
     ListBox1.Items.Append(´@´ + idIRC1.Users.Items[i&93;.Nick)
   else
     If idIRC1.IsVoice(idIRC1.Users.Items&91;i&93;.Nick) then
       ListBox1.Items.Append(´+´ + idIRC1.Users.Items&91;i&93;.Nick)
     else
       ListBox1.Items.Append(idIRC1.Users.Items&91;i&93;.Nick);
  end;


gostaria d saber como mandar msg
eu usei isso mas non me retornou nada enton non sei se funcionou
ond edit6 eh o canal e o RichEdit eh a msg
idIRc1.Say(Edit6.Text,JvRichEdit1.Text);


queria saber tbm como executar um comando:
/comando

ou comando q tem nos canais por exemplo
!lista

eh um comando q tras uma lista de arquivos do canal

e queria saber tbm como usar o xdcc

Obrigado por enqto galera.[/code]


Osocram

Respostas

20/03/2006

Osocram

:shock: :shock: :shock:
up


Responder Citar