Вниз
Скачать: 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.012 c
1-97265
Blacki
2002-05-17 22:07
2002.05.30
Изменение языка


1-97222
Blacki
2002-05-19 23:51
2002.05.30
Проблемы с выключением Windows


1-97245
Blacki
2002-05-20 17:30
2002.05.30
Delphi или C


1-97248
Programmer1
2002-05-20 15:36
2002.05.30
Смена шрифта


1-97246
APTEMKA
2002-05-20 15:10
2002.05.30
Помогите зачет горит. Просьба к модератору не удалять ето письмо




   Наверх