Вниз
Скачать: 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.024 c
1-97225
Hawk2
2002-05-20 16:22
2002.05.30
Помогите справится с глюком.


14-97383
BigBadMutuh
2002-04-14 12:10
2002.05.30
Как из Офиса выдрать дистрибутив Ворда.


3-97204
IvanovSergey
2002-05-05 01:14
2002.05.30
TIBQuery.RowsAffected не рабтает


3-97195
roman_tutov@mail.ru
2002-05-08 14:53
2002.05.30
FIBPlus


1-97320
Musicmax
2002-05-19 19:00
2002.05.30
товаришчи! Подсажите как избежать ошибки ....




   Наверх