Delphi - Como puedo crear un acceso directo desde delphi?

Pues eso, estoy haciendo un instalador y necesito después crear un acceso directo en el escritorio de la cuenta de usuario activa...

Alguien sabe?

Gracias de antemano,
Javier Cuenca

...........................................
http://www.jcuenca.com
...........................................

Te mando el codigo completo de una unidad mia (la que to uso).Estudiala y veras que es sencilla.Si tienes problemas dimelo y te hare llegar el .DFM.
Lo siento. No me la ha permitido mandar este correo. Confirmame tu email y te haré llegar la unidad completa (5K) desde el mio particular