Q&A

  • Re: 헥사코드->유니코드변환...시간이 별로 엄서여...[- -;]
강덕원 wrote:

> 유니코드를 출력하고 싶습니다.

> '가'라는 스트링을 유니코드로 변환하는 법은 알겠는데...

> $AC00를 '가'로 변환하는 법을 모르겠네요.

> (완성형코드가 아니라 유니코드입니다.)

> 도와주세영~[T-T]



적절한 답변이 될지 모르겠습니다만...



procedure TForm1.Button1Click(Sender: TObject);

var

c : PWideChar; // 유니코드 문자형 포인터

begin

c^ := WideChar($AC00); // 포인터에 내용을 $AC00으로 채움

Edit1.text := WideCharToString(c); // 유니코드를 문자열로 변환

end;



폼위에 Edit박스(Edit1) 하나하고 버튼 하나 만들고

버튼 이벤트에 위와 같이 코딩하시고서 버튼을 누르면 Edit1에 '가'라고 찍혀 나옵니다.



질문하신 의도와 맞다면 위의 코드를 적절히 응용하시면 되겠지요?



0  COMMENTS