criando um quot;nickcompletionquot;, como no mirc....

{deleta os ´:´} Delete(S,Pos(´:´,S),1); {verifica na lista se tem o nick que começa com a string} for z := 0 to suilistbox3.Items.Count -1 do begin {se tiver ele deleta a palavra e substitui pelo nick} if (Pos(AnsiLowerCase(CopyPalav(S,1)),AnsiLowerCase(suiListBox3.Items[z]))> 0) then begin Delete(S,Pos(CopyPalav(S, 1),S),Length(CopyPalav(S,1))+1); temp := suilistbox3.Items[z]; {deleta o @ ou o + pra nao aparecer no nickcompletion} if (pos(´@´,temp) > 0) or (pos(´+´,temp) > 0) then begin Delete(temp,1,1); break; end; temp := suilistbox3.Items[z]; nonick := 1; break; end; nonick := 0; end;