AddAppIcon

function AddAppIcon(

  Id: LongWord;

  UserData: LongWord;

  Text_: PChar;

  MsgPort: PMsgPort;

  Lock: LongInt;

  DiskObj: PDiskObject;

  const TagList: array of PtrUInt

):PAppIcon;