Вниз
Скачать: CL | DM;

А как преобразовать строку %EB%EF%3E и т.д. в обычные символы?   Найти похожие ветки 

 
Smok_er   (2002-05-20 22:09) [0]

т.е. %EB - это "л", а %EF - "п"

Пробовал с использованием знака #, но никак не получается.

Может кто-то знает выход?


 
Song ©   (2002-05-20 22:25) [1]


S:="%EB%EF%3E";
S:=StringReplace(s,"%","$",[rfReplaceAll]);
St:="";
While (Length(S)>0) Do
Begin
St:=St+Chr(StrToInt(Copy(S,t,3)));
Delete(S,1,3);
End;
ShowMessage(St);


 
Song ©   (2002-05-20 22:26) [2]

t замени на 1


 
Smok_er   (2002-05-21 00:03) [3]

Большое спасибо!
Работает!



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.007 c
1-97307
Beginner
2002-05-19 13:26
2002.05.30
Как определить програмно WinNT


1-97325
indigo
2002-05-17 18:21
2002.05.30
кнопка


3-97166
Марина
2002-05-07 14:47
2002.05.30
Запрет на удаление записи


3-97167
Reticent
2002-05-07 18:38
2002.05.30
Подскажите


4-97454
Tpv
2002-03-28 15:32
2002.05.30
Функции GetMem и AssignFile




   Наверх