ICQ em Delphi ( como fazer?? )

Galera, estou querendo montar um comunicador instantaneo em delphi tipo msn messenger e icq. Gostari de saber se alguem tem algum material ou codigo pronto sobre o assunto. Toda ajuda será bem vinda