Source position: icon.pas line 372
function IconControlA(
icon: PDiskObject;
const tags: PTagItem
):LongWord;