uses ...,IdURI;
....
procedure TForm4.Button1Click(Sender: TObject);
var
murl , mv : string;
IdHTTP: TIdHTTP;
begin
IdHTTP := TIdHTTP.Create(nil);
murl :=' http://.../proc.php?m=테스트';
TIdURI.URLEnCode(murl);
mv := IdHTTP.Get(TIdURI.URLEnCode(murl));
memo1.Lines.Add(mv);
IdHTTP.Free;
end;
end;
알려주신대로 IdURI를 사용하여 해봤습니다.
그런데 메모에 기록되는것은 " ??ㅽ? " 입니다.
IdURI를 사용하지 안을때는 " ??? " 입니다.
링크에 있는 URLEncodeComponent()를 사용도 해 봤는데 결과는 같습니다.
혹시나 해서 php소스에서
<? echo "한글"; ?>
이렇게 해서 값을 받으면 "한글" 이라는 글자가 제대로 메모에 기록됩니다.
다시한번 부탁드립니다
|