Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

А как преобразовать строку %EB%EF%3E и т.д. в обычные символы? [D5, Win95/98, WinME, NT4, Win2k, WinXP]


Smok_er ©   (2002-05-20 22:09:00) 

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

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

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


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

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


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

t замени на 1


Song   (2002-05-20 22:25:00) [3]


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);


Наверх

Титульная страница Поиск, карта сайта Написать письмо