Форматирование строки для CGI-запросаDelphi , Интернет и Сети , CGI и CookiesФорматирование строки для CGI-запроса
Оформил: DeeCo function FormatStringforCGI(str: string): string; var i: integer; begin for i := 1 to Length(str) do begin if str[i] in ['a'..'z', 'A'..'Z', '0', '1'..'9'] then Result := Result + Str[i] else if Str[i] = ' ' then Result := Result + '+' else Result := Result + '%' + IntToHex(Byte(Str[i]), 2); end; end; Функция Delphi, именуемая Функция проходит по каждому символу входной строки с помощью цикла
Форматированная строка затем возвращается как выход функции. Пример использования этой функции: Вход: Кодированные символы:
Обратите внимание, что эта функция не обрабатывает символы Unicode корректно, поскольку она только проверяет ASCII-символы. Если вам нужно поддерживать символы Unicode, вы можете захотеть использовать болееadvanced encoding scheme или библиотеку URL-encoding. Альтернативное решение с использованием встроенной функции Delphi
Эта функция более компактна и эффективна, поскольку она использует встроенную функциональность Delphi для выполнения URL-encoding. Однако если вам нужно иметь больше контроля над процессом кодирования или поддерживать старые версии Delphi, которая не имеет функции Функция FormatStringforCGI преобразует строку в форматированную строку для отправки в CGI-запрос, заменяя пробелы на плюсы и символы вне ASCII-кодирования на соответствующие коды. Комментарии и вопросыМатериалы статей собраны из открытых источников, владелец сайта не претендует на авторство. Там где авторство установить не удалось, материал подаётся без имени автора. В случае если Вы считаете, что Ваши права нарушены, пожалуйста, свяжитесь с владельцем сайта. :: Главная :: CGI и Cookies ::
|
||||
©KANSoftWare (разработка программного обеспечения, создание программ, создание интерактивных сайтов), 2007 |