Установить значения гиперссылки для Tlabel?

При использовании Delphi Rbuilder я пытаюсь заставить Tlabel функционировать как гиперссылка. Главное, у меня нет доступа к типу TlinkLabel и нет доступа к событию OnClickLink.

Однако, когда я добавляю метку, становятся доступны опции гиперссылки, цвета гиперссылки и гиперссылки. Если флажок hyperlinkenabled установлен и поле гиперссылки заполнено адресом, например "www.google.com", это добавляет к моей форме ярлык, по которому я могу нажать, и он переходит на google.com.

Это прекрасно работает, если я хочу, чтобы фиксированный веб-адрес шел. Но то, что я действительно хочу, - это возможность ввести значение базы данных в этот адрес.

В рамках события Tlabel OnGetText я попытался сделать это:

begin
label19.hyperlinkenabled := True;
label19.hyperlink := 'https://www.reddit.com/r/'+ tableA['FieldB'];      
end; 

Компилируется без ошибок, но не приводит к кликабельной ссылке.

Кликабельная ссылка работает нормально, хотя, если я зайду в визуальные свойства для своей метки, поставлю флажок и введите фиксированное значение гиперссылки в поле гиперссылки.

Есть идеи?

0 ответов

Другие вопросы по тегам