Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Работа с сетью в Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 20.06.2010, 22:45   #11
Пепел Феникса
Старожил
 
Аватар для Пепел Феникса
 
Регистрация: 28.01.2009
Сообщений: 21,000
По умолчанию

http://programmersforum.ru/showthread.php?t=104270
рядом с вашей темой, поиск то на что?
Хорошо поставленный вопрос это уже половина ответа. | Каков вопрос, таков ответ.
Программа делает то что написал программист, а не то что он хотел.
Функции/утилиты ждут в параметрах то что им надо, а не то что вы хотите.
Пепел Феникса вне форума Ответить с цитированием
Старый 20.06.2010, 22:54   #12
Darw1n
Пользователь
 
Регистрация: 27.04.2008
Сообщений: 17
По умолчанию

Указанный вами топик я прочел раньше. Решения там не нашел. Собственно как и ТС.
Вы писали прочитать про урл, если честно то я читал про него раз 5! Функции перекодирования в формат урл там нет! Как и таблицы по которой это нужно сделать! Если она у вас есть, или есть функция перекодирования, буду рад если поможете.
Darw1n вне форума Ответить с цитированием
Старый 21.06.2010, 01:27   #13
W0LF
Форумчанин
 
Аватар для W0LF
 
Регистрация: 28.03.2008
Сообщений: 940
По умолчанию

Код:
function StrToURL(s: string): string;
var
  i: integer;
  l: integer;
  ss: string;
  tmp: string[1];
begin
  ss:= '';
  l:= length(s);
  for i:=0 to l-1 do
  begin
    tmp:= copy(s,1,1);
    delete(s,1,1);
    ss:=ss+'%'+inttohex(ord(tmp[1]),2);
  end;
  result:= ss;
end;
Может и неправильно, но проверку на гугле и яндексе прошла успешно...
W0LF вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Компоненты Indy10 zevs5 Работа с сетью в Delphi 4 19.10.2015 15:44
Ansi в UTF-8 и наоборот UTF-8 в Ansi Alar Работа с сетью в Delphi 3 09.12.2010 17:02
UTF-8 alex171069 Общие вопросы C/C++ 1 18.05.2009 11:57
Проблемы при установке InDy10 Пепел Феникса Компоненты Delphi 2 18.02.2009 16:35