![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
то значит символы 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-?