Здравствуйте, возникла проблема, нужно, чтобы при условии sRadioButton1.Click менялся стиль всплывающей подсказки в sHintManager, за это отвечает свойство Predefinitions, но мой код расположенный ниже почему-то не работает, хотя должен, прошу помочь разобраться...

Код:
uses
sConst, sHintManager; 
... 
procedure TForm6.sRadioButton5Click(Sender: TObject);
begin
If sRadioButton5.Checked=true then
Form1.sHintManager1.Predefinitions:=shEllipse
else
exit;
end;

Решение:

там combobox и он принемает, в качестве значений, индекс элемента, а не текст элемента.

Но можно попробовать закключить shEllipse в [].