Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.05.30;
Скачать: 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 вся ветка

Текущий архив: 2002.05.30;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.008 c
14-97423
IronHawk
2002-04-23 00:00
2002.05.30
Супер лёгкая задачка для начинающих 3 !


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


1-97220
MaximatorVeter
2002-05-20 14:48
2002.05.30
запись TClass = class of TObject; в System.pas


3-97132
Sergant
2002-05-05 03:44
2002.05.30
Автоопределение кодировки DBF-файла


1-97309
MaximatorVeter
2002-05-18 18:57
2002.05.30
Не срабатывает точка останова в деструкторе TComponent