1type
2  TNotificationType = (ntInformation, ntWarning, ntCaution);

Или

1type
2  TNotificationType = TOleEnum;
3const
4  ntInformation = $00000000;
5  ntWarning = $00000001;
6  ntCaution = $00000002;

Элементы перечисления:

Имя	Значение	Назначение
ntInformation	0	Информация
ntWarning	1	Предупреждение
ntCaution	2	Проблема