Unicode

← →
opolo2000 © (2009-05-14 07:58) [0]

Добрый день. Подскажите, пожалуйста, как String:
C:\Documents and Settings\pta\Local Settings\Temporary Internet Files\Content.IE5\DS59D2O3\%D0%90%D0%A5%D0%A1%D0%90745226-007_%D0%9F%D0%B0%D0%BD%D0%B5%D0%BB%D1%8C_R6[1].dwg
преобразовать в String:
C:\Documents and Settings\pta\Local Settings\Temporary Internet Files\Content.IE5\DS59D2O3\АХСА745226-007_Панель_R6[1].dwg

← →
oldman © (2009-05-14 09:07) [1]

обработать посимвольно видимо

← →
Сергей М. © (2009-05-14 09:11) [2]

А в чем собссно проблема ?
Готовую функцию ищешь или не знаешь как подстроку %D0%90%D0%A5%D0%A1%D0%90 ручками конвертировать ANSI-подстроку ?

← →
opolo2000 © (2009-05-14 09:28) [3]

Подскажите, пожалуйста, таблицу соответствий: $D0 = "А"?
По моим предположения $D0 = "Р".

← →
oldman © (2009-05-14 09:51) [4]

%D0 вообще не при чем
Сам посмотри:

%D0%90%D0%A5%D0%A1%D0%90 = АХСА

то есть:
%D0%90 = А
%D0%A5 = Х
%D0%A1 = С
%D0%90 = А

Дальше жевать?

← →
Сергей М. © (2009-05-14 09:52) [5]

var src, dst: String; i: Integer; begin src := "%D0%90%D0%A5%D0%A1%D0%90"; src := StringReplace(src, "%", "", [rfReplaceAll]); SetLength(dst, Length(src) div 2); HexToBin(PChar(src), PChar(Dst), Length(Dst)); ShowMessage(UTF8Decode(dst)); end;

Большое спасибо.

> opolo2000 (14.05.2009 7:58:00) [0]

Это не Юникод, а UTF-8, транспортная 8 битовая кодировка с переменным количеством байте.

Unicode Найти похожие ветки