[lmikle]

Нет, не так.
Из предположения, что каждый номер + пароль написан на отдельной строчке:

Код:

var
  I : Integer;
begin
  For I := 0 To Memo1.Lines.Count-1 Do
    begin
        ICQ:=TICQClient.create(nill);
        ICQ.uin := Copy(Memo1.Lines[i],1,POs(';',Memo1.Lines[i])-1);
        ICQ.Password := Copy(Memo1.Lines[i],POs(';',Memo1.Lines[i])+1,Length(Memo1.Lines[i]));
       ICQ.Login();
    end;
end;

И не забудь где-нить ссылки на создаваемые объекты хранить, что бы потом их корректно уничтожить.