본문으로 바로가기
  1. Home
  2. 컴퓨터/프로그래밍
  3. 라자루스 Ansi to UTF8, UTF8 to Ansi 변환

라자루스 Ansi to UTF8, UTF8 to Ansi 변환

· 댓글 0 · 바다야크

윈도우 프로그램을 작성하다 보면 한글 처리가 걸리는 경우가 있습니다. 자주 경험하는데요, 프로그램을 다 짰다 싶은데 생각지도 않은 한글에서 에러가 발생합니다. 그래서 문자열을 처리할 때는 항상 한글을 넣어 검증합니다. 라자루스에서 Ansi to UTF8 또는 UTF8 to Ansi 변환 방법은 아래와 같습니다.

라자루스 UTF8 to Ansi

uses
   lazutf8;

strAnsi  := lazutf8.UTF8ToWinCP( strUtf8);

uses절에 lazutf8 유닛 추가를 잊지 마세요.

라자루스 Ansi to UTF8

uses
   lazutf8;

SetCodePage(RawByteString( strAnsi), 949, FALSE);
strUtf8  := AnsiToUtf8( strAnsi);

UTF8ToWinCP()와는 달리 언어코드를 지정해 주어야 주어야 하는데요, 그래서 저 같은 경우 LocalAnsiToUtf8() 함수를 만들어서 사용합니다.

uses
  lazutf8;

function LocalAnsiToUtf8( strAnsi: string): string;
begin
   SetCodePage( RawByteString( strAnsi), 949, FALSE);
   result  := AnsiToUtf8( strAnsi);
end;


procedure TForm1.Button1Click(Sender: TObject);
begin
  label1.Caption := LocalAnsiToUtf8( strAnsi);
end;

역시 uses절에 lazutf8 유닛을 추가해야 합니다.

💬 댓글 0

이름을 저장합니다.

최근글 thumbnail 구글 원 VPN 핸드폰 보안 강화 thumbnail 쿠팡앱 광고 알림 끄기 (2) thumbnail 넥밴드 블루투스 헤드폰 S21 해외직구 사용후기 thumbnail 유튜브 내가 쓴 댓글 확인 삭제 방법 thumbnail 구글 크롬 주소창 검색 엔진 추가 방법 thumbnail 전자책 리더기 블루투스 리모컨 해외직구 추천 (1) thumbnail 스타일브이 환불 요청 방법 (3) thumbnail 갤럭시 핸드폰과 윈도우 컴퓨터 연결 방법
랜섬웨어로 고생 많으셨겠어⋯ 💬바다야크 윈도우가 업그레이드될 수록⋯ 💬바다야크 아이쿵. 저 이거 계속 써야하⋯ 💬swan 랜섬웨어 걸려서 데이타고 머⋯ 💬swan 일부러 숨겨 놓은 것인지 찾⋯ 💬바다야크