AddAppIcon

function AddAppIcon(

  id: LongWord;

  userdata: LongWord;

  text_: pCHAR;

  msgport: pMsgPort;

  lock: LongInt;

  diskobj: pDiskObject;

  const taglist: array of PtrUInt

):pAppIcon;