Старый 09.10.2011, 14:17   #1
Вадимка
RAM 64MB
 
Аватар для Вадимка
 
Регистрация: 09.02.2010
Сообщений: 94
Вадимка скоро придёт к известностиВадимка скоро придёт к известности
Вадимка вне форума

По умолчанию требуется помощь по delphi


вчера решил написать маленькую програмку, которая отправляла бы смс через сайт одного из операторов...всё шло на ура, программа работает, всё хорошо, решил проверить свою програму на себе и сталкнулся с проблемой отправки руского текста...
вернее вот как...
английский текст и цифры (в доставленном сообщении) отображаются нормально, а русские буквы выглядят в виде квадратов
решил воспользоваться сниффером и посмотреть что отправляется (сообщение с русскими буквами)
вот скрин


может проблема в кодировке?? если так, то как её решить....
  Ответить с цитированием
Последний раз редактировалось Вадимка; 03.02.2012 в 17:38.
Ответ: требуется помощь по delphi
Старый 09.10.2011, 14:56   #2
mironich
RAM 256MB
 
Аватар для mironich
 
Регистрация: 22.11.2010
Сообщений: 2,026
mironich - просто великолепная личностьmironich - просто великолепная личностьmironich - просто великолепная личностьmironich - просто великолепная личностьmironich - просто великолепная личностьmironich - просто великолепная личностьmironich - просто великолепная личностьmironich - просто великолепная личность
mironich вне форума
По умолчанию Ответ: требуется помощь по delphi

Для начала сообщение туда летит скорее всего в юрл кодировке.
Смотри по хедерам ппакета что летит на сайт броузера, когда отправляеш сообщение.
__________________
"И это было так весело и так интересно, что я перестал дрочить. Перестал на голых девушек и стал на статистику партнерских программ." (c) Из повести задрота.
  Ответить с цитированием
Ответ: требуется помощь по delphi
Старый 10.10.2011, 14:41   #3
Вадимка
RAM 64MB
 
Аватар для Вадимка
 
Регистрация: 09.02.2010
Сообщений: 94
Вадимка скоро придёт к известностиВадимка скоро придёт к известности
Вадимка вне форума
По умолчанию Ответ: требуется помощь по delphi

несколько отличий от того что шлёт моя программа

Content-Encoding gzip
Transfer-Encoding chunked

программа этих пераметров не передаёт

Добавлено через 23 часа 27 минут 11 секунд
проблему решил
спосла функция ....

function Encode(S : String) : String;
var
I : Integer;
begin
Result := '';
for I := 1 to Length(S) do begin
if AnsiChar(S[I]) in ['0'..'9', 'A'..'Z', 'a'..'z'] then
Result := Result + S[I]
else
Result := Result + '%' + IntToHex(Ord(S[I]), 2);
end;
end;

ну и .....
data.Add('smstext='+Encode(UTF8Encode(edit4.Text)) );
может кому то поможет))
спасибо mironich
  Ответить с цитированием
Последний раз редактировалось Вадимка; 10.10.2011 в 14:41. Причина: Добавлено сообщение
Ответ: требуется помощь по delphi
Старый 10.10.2011, 14:43   #4
mironich
RAM 256MB
 
Аватар для mironich
 
Регистрация: 22.11.2010
Сообщений: 2,026
mironich - просто великолепная личностьmironich - просто великолепная личностьmironich - просто великолепная личностьmironich - просто великолепная личностьmironich - просто великолепная личностьmironich - просто великолепная личностьmironich - просто великолепная личностьmironich - просто великолепная личность
mironich вне форума
По умолчанию Ответ: требуется помощь по delphi

Цитата:
Сообщение от Вадимка Посмотреть сообщение
Content-Encoding gzip
Transfer-Encoding chunked
Это тебе сервер отвечает что ответ пожат gzip-ом, и что ответ будет идти по кускам.
__________________
"И это было так весело и так интересно, что я перестал дрочить. Перестал на голых девушек и стал на статистику партнерских программ." (c) Из повести задрота.
  Ответить с цитированием
Ответ: требуется помощь по delphi
Старый 10.10.2011, 15:35   #5
Вадимка
RAM 64MB
 
Аватар для Вадимка
 
Регистрация: 09.02.2010
Сообщений: 94
Вадимка скоро придёт к известностиВадимка скоро придёт к известности
Вадимка вне форума
По умолчанию Ответ: требуется помощь по delphi

вот что получилось в итоге
[Ссылки доступны только зарегистрированным пользователям . Зарегистрируйся, чтобы увидеть ссылку.]
программа ещё сыра.....нет проверок....необходимо вводить данные корректно....
  Ответить с цитированием
Ответ: требуется помощь по delphi
Старый 19.10.2011, 16:40   #6
.facepa1m.
RAM 32MB
 
Аватар для .facepa1m.
 
Регистрация: 23.02.2011
Сообщений: 49
.facepa1m. Новичок
.facepa1m. вне форума
По умолчанию Ответ: требуется помощь по delphi

ну слать шлет на русском норм все дизайн поправь еще мб довать mts megafon beeline и все ок будет
  Ответить с цитированием
Ответ

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.



взломать аську аську взломать взлом программы сделать взлом программы как сделать взлом программы хакерские сайты как легко взломать аську лучшие хакерские сайты топ список хакерские сайты взлом паролей легкий взлом паролей

Powered by vBulletin® Version 3.8.5
Copyright ©2000 - 2009, Jelsoft Enterprises Ltd. Перевод: zCarot