Source position: dialogs.pp line 592
type TTaskDialogIcon = (
tdiNone,
tdiWarning,
tdiError,
tdiInformation,
tdiShield,
tdiQuestion
);