Как создать "чистый" URL для веб-приложений на Delphi с помощью WebBroker и ISAPI или Apache

Delphi , Интернет и Сети , URL

В современном веб-разработке одним из важных аспектов является создание "чистых" URL-адресов, которые не только улучшают пользовательский опыт, но и положительно влияют на SEO. В данной статье мы рассмотрим, как создать "чистые" URL для веб-приложений, разработанных с помощью WebBroker в Delphi, с использованием ISAPI или Apache.

Проблема

Типичный URL-адрес веб-приложения, созданного с помощью WebBroker в Delphi, выглядит следующим образом:

http://www.mywebsite.com/myapp.dll?name=fred

или

http://www.mywebsite.com/myapp.dll/names/fred

Однако, более предпочтительным вариантом является "чистый" URL, не содержащий имени исполняемого файла и параметров в конце, например:

http://www.mywebsite.com/names/fred

Вопрос состоит в том, как достичь этого с помощью Delphi и WebBroker, используя ISAPI или Apache.

Подтвержденный ответ

Существует несколько способов достичь "чистых" URL в зависимости от того, какой веб-сервер вы используете (ISAPI или Apache). Рассмотрим оба подхода.

1. Использование Apache с mod_rewrite

Одним из способов достичь "чистых" URL с помощью Apache является использование модуля mod_rewrite. Этот модуль позволяет перенаправлять запросы от URL с параметрами к URL без них. Вот пример конфигурации Apache для достижения нашего целевого URL:

RewriteEngine On
RewriteRule ^names/([A-Za-z0-9-]+)$ /myapp.dll/names/$1 [L]

В этом примере мы используем регулярное выражение для захвата имени ([A-Za-z0-9-]+) в URL и перенаправляем запрос к соответствующему URL-адресу веб-приложения. Теперь, когда пользователь вводит http://www.mywebsite.com/names/fred, Apache перенаправляет запрос к http://www.mywebsite.com/myapp.dll/names/fred, но в адресной строке браузера отображается "чистый" URL.

2. Использование ISAPI с URL Rewrite

Если вы используете IIS с модулем URL Rewrite, процесс создания "чистых" URL очень похож на использование Apache с mod_rewrite. Вот пример конфигурации для достижения нашего целевого URL:

<rule name="Names" patternSyntax="Wildcard" stopProcessing="true">
  <match url="*{name}" />
  <action type="Rewrite" url="/myapp.dll?{R:1}" />
</rule>

В этом примере мы используем правило URL Rewrite для захвата имени в URL и перенаправления запроса к соответствующему URL-адресу веб-приложения. Теперь, когда пользователь вводит http://www.mywebsite.com/names/fred, IIS перенаправляет запрос к http://www.mywebsite.com/myapp.dll?name=fred, но в адресной строке браузера отображается "чистый" URL.

Альтернативный ответ

Если вы не хотите использовать сторонние модули или настройки сервера, вы можете внести изменения непосредственно в свой код Delphi с помощью WebBroker. Для этого вам нужно будет переопределить метод DefaultHandler в вашем веб-модуле и обработать запросы вручную.

Вот пример кода на Object Pascal (Delphi), который демонстрирует, как можно обработать запросы для достижения "чистых" URL:

unit Unit1;

interface

uses
  Winapi.Windows, System.SysUtils, System.Classes, System.Variants, System.Helpers, System.SysInit, System.Vcl.Graphics, System.ExtCtrls, System.Web;

type
  TForm1 = class(TForm)
    procedure FormCreate(Sender: TObject);
  private
    { Private declarations }
    FWebModule: TWebModule;
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.FormCreate(Sender: TObject);
begin
  FWebModule := TWebModule.Create(nil);
  FWebModule.DefaultHandler := DefaultHandler;
  FWebModule.Active := True;
end;

function TForm1.DefaultHandler(Request: TWebRequest; Response: TWebResponse; var Handled: Boolean): Boolean;
var
  URLParams: TStringDynArray;
  Name: string;
begin
  Result := False;
  Handled := False;

  // Разбиваем URL на части
  URLParams := TStringDynArray.Create(Request.Param('name').ToString);

  // Проверяем, есть ли параметр 'name' в URL
  if Length(URLParams) > 0 then
  begin
    Name := URLParams[0];

    // Здесь вы можете добавить свой код для обработки запроса с именем 'Name'

    // Возвращаем "чистый" URL в заголовке ответа
    Response.ContentType := 'text/plain';
    Response.Write('Hello, ' + Name + '!');

    Handled := True;
  end;
end;

end.

В этом примере мы переопределяем метод DefaultHandler в нашем веб-модуле и обрабатываем запросы вручную. Мы извлекаем параметр 'name' из URL и используем его для генерации ответа. В результате, пользователь видит "чистый" URL в адресной строке браузера, а сервер обрабатывает запрос с параметром 'name'.

Заключение

В этой статье мы рассмотрели, как создать "чистые" URL для веб-приложений, разработанных с помощью WebBroker в Delphi, с использованием ISAPI или Apache. Мы изучили два подхода: использование модулей перезаписи URL для Apache и IIS, а также внесение изменений непосредственно в код Delphi с помощью WebBroker. Каждый из этих подходов имеет свои преимущества и может быть использован в зависимости от ваших конкретных требований и возможностей сервера.

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

В статье рассматривается процесс создания 'чистых' URL для веб-приложений, разработанных с помощью WebBroker в Delphi, с использованием ISAPI или Apache, чтобы улучшить пользовательский опыт и SEO.

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

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

:: Главная :: URL ::