idhttp и знаки вопросов

[Lich]

Проблема состоит в том, что когда делаю пост запрос, и потом смотрю в сниффере что и куда отправилось, то в строчке что, вместо руского текста вот это : ????????...Писали, что исправить эту траблу поможет ChartoOem, но увы нетс...Кто-нить встречался с подобной проблемой?!

[Роман Радер]

угу, там надо перекодировать немного...
пару минут, я найду исходник функции...

[Lich]

Сообщение от Роман Радер

угу, там надо перекодировать немного...
пару минут, я найду исходник функции...

Буду надеяться что найдешь и он заработает как следует

[Роман Радер]

Прошу прощения, что пару минут затянулись в сутки
попробуй этот код:

function HTTPTran(St : String) : String; 
var i : Integer; 
begin 
Result:=''; 
for i:=1 to length(St) do 
   if St[i] in ['a'..'z','A'..'Z','0','1'..'9'] then 
     Result:=Result+St[i] 
   else if St[i]=' ' then 
     Result:=Result+'+' 
   else 
     Result:=Result+'%'+IntToHex(Byte(St[i]),2); 
end;

вообще-то она предназначена для трансляции url адресов, но попробуй.

[Lich]

Сообщение от Роман Радер

Прошу прощения, что пару минут затянулись в сутки
попробуй этот код:

function HTTPTran(St : String) : String; 
var i : Integer; 
begin 
Result:=''; 
for i:=1 to length(St) do 
   if St[i] in ['a'..'z','A'..'Z','0','1'..'9'] then 
     Result:=Result+St[i] 
   else if St[i]=' ' then 
     Result:=Result+'+' 
   else 
     Result:=Result+'%'+IntToHex(Byte(St[i]),2); 
end;

вообще-то она предназначена для трансляции url адресов, но попробуй.

К сожалению это не помогло...Не знаю почему так, в Дельфи 7 отправлялось все нормально, но вот в Дельфи 2009 знаки вопросов вместо русских букв...Может есть какие-то другие способы кодировки/конвертации??!

[Роман Радер]

Сообщение от Lich

К сожалению это не помогло...Не знаю почему так, в Дельфи 7 отправлялось все нормально, но вот в Дельфи 2009 знаки вопросов вместо русских букв...Может есть какие-то другие способы кодировки/конвертации??!

Сказали бы сразу, что у вас Делфи 2009. Там используется UTF8 (Юникод).
Для корректной отправки надо перекодировать в Ansi.
Тема была: http://programmersforum.ru/showthread.php?t=14790

[Lich]

Сообщение от Роман Радер

Сказали бы сразу, что у вас Делфи 2009. Там используется UTF8 (Юникод).
Для корректной отправки надо перекодировать в Ansi.
Тема была: http://programmersforum.ru/showthread.php?t=14790

Нет, не помогло...

[Роман Радер]

тогда незнаю
PS хотя я почти уверен, что проблема именно в юникоде, ведь на 7 делфи работало...

[Lich]

Проблема решена - Установил Delphi 2007 и все ОК.