Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

то значит символы D0 и D1-?


denissoft ©   (2005-10-31 09:22:00) 

Генерируются  браузером во время запроса

/%D0%B2%D0%BE%D0%BF%D1%80%D0%BE%D1%81.JPG

Что значит символы D0 и D1-?

Function GetURLToStr(s:string):string;
var x:integer;
   n:boolean;
   t1,s1:string;
   len,d0:integer;
begin
s1:='';
t1:='';
d0:=0;
len:=length(S);
n:=true;
for x:=1 to len do begin;
if x<len then
if s[x]='.' then
if s[x+1]='.' then  s[x]:='0';

if s[x]='/' then s[x]:='\';

    if s[x] ='%' then begin
    n:=false;
    s1:='';
    end
    else
      if not n then begin
      s1:=s1+s[x];
      if length(s1) = 2 then begin
      if (s1='D0') then
      d0:=48;    значения ????
      if (s1='D1') then
      d0:=112; // значения ????
      if (s1[1]<>'D') then
          t1:=t1+Chr(HexToInt(s1)+d0);
      s1:='';
      n:=true;
      end;
      end
      else
      if n then
      t1:=t1+s[x]

    end;
result:=t1;
end;


SergP.   (2005-10-31 11:34:00) [1]


>  то значит символы D0 и D1-?


D0 - это руская буква "P"
D1 - это руская буква "С"


isasa   (2005-10-31 10:36:00) [2]

См. MSDN
UrlUnEscape
Converts escape sequences back into ordinary characters.


Anatoly Podgoretsky   (2005-10-31 10:36:00) [3]

denissoft ©   (31.10.05 10:26) [5]
Ты уже получил ее на русском языке - это вопрос.jpg в визуальном представлении.


denissoft   (2005-10-31 10:26:00) [4]


> А что, CoInternetParseUrl или UrlUnescape не подходят


Может и подходит, только я такую функцию не нашел…  // даже в Yandex

Надо получить строку на русском языке


Anatoly Podgoretsky   (2005-10-31 10:20:00) [5]

GuAV ©   (31.10.05 10:02) [3]
Смотря что надо получить, может подходят, а может и нет. Подробностей то он не приводит.


GuAV   (2005-10-31 10:02:00) [6]


> denissoft ©   (31.10.05 9:22)


Ух ты !

А что, CoInternetParseUrl или UrlUnescape не подходят ?


Anatoly Podgoretsky   (2005-10-31 09:50:00) [7]

Это номер блока в UTF


denissoft   (2005-10-31 09:22:00) [8]


> что значит символы D0 и D1-?


Наверх

Титульная страница Поиск, карта сайта Написать письмо