"Решение проблемы перенаправления гиперссылки в объекте TfrxMemoView"

Delphi , Базы данных , Отчеты

Решение проблемы перенаправления гиперссылки в объекте TfrxMemoView

При работе с отчетами в FastReport VCL 5, некоторые пользователи сталкиваются с проблемой перенаправления гиперссылок в объекте TfrxMemoView. Вместо того чтобы открывать внешнюю URL, гиперссылка перенаправляет пользователя на локальный каталог. В этой статье мы рассмотрим причину этой проблемы и предложим решение.

Описание проблемы

Пользователь пытается создать гиперссылку (внешнюю URL) в объекте TfrxMemoView, но при нажатии на ссылку происходит перенаправление на локальный каталог, а не на указанный веб-сервис. В Hyperlink Editor пользователь добавляет базовую ссылку в переменную link_application, но вместо ожидаемой URL, получает путь к локальной директории.

Причина проблемы

Оказалось, что это был баг в версии 5.4.6 FastReport VCL 5, которую использовал пользователь.

Решение проблемы

Обнаруженная проблема была исправлена в последней версии FastReport VCL 5, а именно в версии 5.6.18. Пользователям, столкнувшимся с этой проблемой, рекомендуется обновить свою версию FastReport до последней стабильной версии, чтобы исправить это поведение.

Альтернативное решение

Если по какой-то причине обновление версии FastReport невозможно, пользователь может обойти эту проблему, вручную добавляя протокол HTTP или HTTPS к своей URL-адресу в поле "URL" гиперссылки. Например, если пользователь хочет открыть ссылку на веб-сервис "https://myapplication.host.com/rest/mywebservice/354310", он должен ввести "http://myapplication.host.com/rest/mywebservice/354310" или "https://myapplication.host.com/rest/mywebservice/354310" в поле "URL".

Пример кода на Object Pascal (Delphi) для добавления гиперссылки в отчет FastReport:

procedure TForm1.CreateHyperlink(const URL: string; const Caption: string);
var
  Hyperlink: TfrxHyperlink;
begin
  Hyperlink := TfrxHyperlink.Create(nil);
  Hyperlink.URL := URL;
  Hyperlink.Caption := Caption;
  Hyperlink.Parent := frxMemoView1; // Замените frxMemoView1 на ваш объект TfrxMemoView
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
  CreateHyperlink('https://myapplication.host.com/rest/mywebservice/354310', 'Открыть веб-сервис');
end;

В этом примере мы создаем процедуру CreateHyperlink, которая принимает URL и Caption в качестве параметров и добавляет гиперссылку в объект TfrxMemoView. При нажатии на кнопку с именем Button1, создается гиперссылка и добавляется в отчет.

Создано по материалам из источника по ссылке.

В контексте данного текста описывается проблема перенаправления гиперссылок в объекте TfrxMemoView в FastReport VCL 5, а также предлагается решение этой проблемы через обновление версии FastReport или добавление протокола HTTP/HTTPS к URL-адресу.

Комментарии и вопросы

Получайте свежие новости и обновления по Object Pascal, Delphi и Lazarus прямо в свой смартфон. Подпишитесь на наш Telegram-канал delphi_kansoftware и будьте в курсе последних тенденций в разработке под Linux, Windows, Android и iOS

:: Главная :: Отчеты ::