이것은 HTML Encode한 부분입니다..



Encode, Decode 부분은 Delphikorea.com에 가시면 자료실에 소스가 있습니다.



초보 DEL 100 wrote:

> 전 델파이로 폼에다 웹브라우저 콘트롤을 올렸습니다.

> 근데... 한글을 변수로 넘기다 보니 문제가 있었습니다.

> 웹에서는 ASP나 CGI로 한글이 담긴 변수를 넘겨주면 담

> 페이지는 한글을 %02%34등으로 지가 바꾸는 데요..

> ( 기분 나쁜 넘들.... ^^!) 여하튼....

>

> 어쩌겠습니까? 지들이 바꾼데는데... 저도 이렇게 바꿔서

> 날려주고 싶거든요. 델파이 프로그램안에서요.

> 왜 이렇게 바뀌는 건지 어떤 법칙이 있는건지.(머피의 법칙인감?)

> 아니면 확실이 이런 모양으로 한글을 성형 수술 시켜주는 방법을

> 아쉬는 분은 지체 말고 가르쳐 주시면 백골 황망(?) 하겠습니다.

>

> 많은 고수님들의 조언을 바라고...

> 오늘도 델파이 프로그래머 여러분 힘내시고 좋은 하루 되시길..

> 그럼 이만... 쩝 배고프당.

>

그건 말입니다.



문자열을 한바이트씩 쪼개서 16진수로 표현해서 보내기 때문입니다.



"한글일때" ==> %C7%D1%B1%DB%C0%CF%B6%A7 가 되겠죠...



아래의 함수로 구현할 수 있습니다.



참고하세요...



function Str2Hexs(s:string):string;

var

i,j,k:integer;

begin

i:=Length(s);



RESULT:='';



if i < 1 then exit;



for j:=1 to i do begin

k:=Ord(s[j]);

RESULT:=RESULT+'%'+trim(IntToHex(k,2));

end;



end;







화랑 wrote:

> 이것은 HTML Encode한 부분입니다..

>

> Encode, Decode 부분은 Delphikorea.com에 가시면 자료실에 소스가 있습니다.

>

> 초보 DEL 100 wrote:

> > 전 델파이로 폼에다 웹브라우저 콘트롤을 올렸습니다.

> > 근데... 한글을 변수로 넘기다 보니 문제가 있었습니다.

> > 웹에서는 ASP나 CGI로 한글이 담긴 변수를 넘겨주면 담

> > 페이지는 한글을 %02%34등으로 지가 바꾸는 데요..

> > ( 기분 나쁜 넘들.... ^^!) 여하튼....

> >

> > 어쩌겠습니까? 지들이 바꾼데는데... 저도 이렇게 바꿔서

> > 날려주고 싶거든요. 델파이 프로그램안에서요.

> > 왜 이렇게 바뀌는 건지 어떤 법칙이 있는건지.(머피의 법칙인감?)

> > 아니면 확실이 이런 모양으로 한글을 성형 수술 시켜주는 방법을

> > 아쉬는 분은 지체 말고 가르쳐 주시면 백골 황망(?) 하겠습니다.

> >

> > 많은 고수님들의 조언을 바라고...

> > 오늘도 델파이 프로그래머 여러분 힘내시고 좋은 하루 되시길..

> > 그럼 이만... 쩝 배고프당.

> >