AddAppIcon

function AddAppIcon(

  ID: LongWord;

  UserData: LongWord;

  Text_: PChar;

  MsgPort: PMsgPort;

  Lock: Pointer;

  DiskObj: PDiskObject;

  const Tags: array of PtrUInt

):PAppIcon;