Вверх ↑
Ответов: 16884
Рейтинг: 1239
#1: 2012-02-20 01:28:33 ЛС | профиль | цитата
nesco, чтобы не вводить проверку на допустимый диапазон, наверное нужно изменить в Case _prop_XXXX последнюю строчку
   case _prop_Type of
0: Tp := MB_OK;
1: Tp := MB_OKCANCEL;
2: Tp := MB_YESNO;
3: Tp := MB_YESNOCANCEL;
4: Tp := MB_RETRYCANCEL;
5: Tp := MB_ABORTRETRYIGNORE;
end;

// НА

case _prop_Type of
0: Tp := MB_OK;
1: Tp := MB_OKCANCEL;
2: Tp := MB_YESNO;
3: Tp := MB_YESNOCANCEL;
4: Tp := MB_RETRYCANCEL;
else Tp := MB_ABORTRETRYIGNORE; // вот здесь применить ELSE
end;

карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0