Delphi Programming Forum
C++Builder  |  Delphi  |  FireMonkey  |  C/C++  |  Free Pascal  |  Firebird
볼랜드포럼 BorlandForum
 경고! 게시물 작성자의 사전 허락없는 메일주소 추출행위 절대 금지
델파이 포럼
Q & A
FAQ
팁&트릭
강좌/문서
자료실
컴포넌트/라이브러리
FreePascal/Lazarus
볼랜드포럼 홈
헤드라인 뉴스
IT 뉴스
공지사항
자유게시판
해피 브레이크
공동 프로젝트
구인/구직
회원 장터
건의사항
운영진 게시판
회원 메뉴
북마크
델마당
볼랜드포럼 광고 모집

델파이 Q&A
Delphi Programming Q&A
[14730] Re:Re:XE2에서 cPort4.11로 영수증프린트기 한글 출력문제
김영곤 [pagewiz] 2484 읽음    2013-07-23 22:08
gomsun2 님이 쓰신 글 :
: TStringStream로 가능할 것 같습니다.
:
: var
:   LBuffer: TStringStream;
: begin
:   LBuffer := TStringStream.Create(EmptyStr, TEncoding.ANSI);
:   LBuffer.WriteString('가나다');
:   FComport.Write(LBuffer.Memory, LBuffer.Size);
: 

: 또는 TBytes를 버퍼로 만들어 활용해보세요.
:
: var
:   LBytes: TBytes;
: begin
:   ...
:   FComport.Write(LBytes[0], Length(LBytes));
: end;
: 

:
: 김영곤 님이 쓰신 글 :
: : const
: : {================프린터용 제어문자 선언====================}
: :   LF       = Char(10);
: :   FF       = Char(12);
: :   CR       = Char(13);
: :   ESC     = Char(27);
: :   CUT     = ESC + 'i'; 
: :
: :
: :
: :   ComPrint.WriteStr('****************************************'+LF);
: :   ComPrint.WriteStr('ENG : abcdefghijklmnopqrstuvwxyz1234567890'+LF);
: :   ComPrint.WriteStr('****************************************'+LF);
: :   ComPrint.WriteStr(LF);
: :   ComPrint.WriteStr(LF);
: :   ComPrint.WriteStr('****************************************'+LF);
: :   ComPrint.WriteStr('KOR : ' + AnsiString('가나다라마바사') + LF);
: :   ComPrint.WriteStr('****************************************'+LF);
: :
: :   ComPrint.WriteStr(LF);
: :   ComPrint.WriteStr(LF);
: :   ComPrint.WriteStr(CUT);
: :
: : end;
: :
: :
: : 다른건 출력이 잘 되는데 한글만 깨지네요.. 왜 깨지는 도져히 모르겠습니다..
: :
: : 혹시나 싶어서 델파이7.0으로 컴파일하면 한글출력이 잘 됩니다..
: :
: : 프린트기는 모델은 LK-TE201 입니다..
: :
: : 쿠핑님 글을 보고 ComPrint.WriteStr('KOR : ' + PAnsiChar(AnsiString('가나다라마바사')) + LF);
: :
: : 이렇게 해도 마찬가지네요..
: :
: : 읽어주셔서 감사합니다..

답변에 정말 감사드립니다..


TStringStream를 이용하여 님이 제시한 예제대로 그대로 해 봐도 출력시 한글이 깨지네요..

TBytes를 이용하여 출력시 정상 출력이 됩니다..

var
  LBytes : TBytes;

begin
  LBytes := BytesOf('전표를출력합니다');

  ComPrint.Write(LBytes[0],Length(LBytes);

end.

문제가 해결되여 정말 기쁘고  감사드립니다..^^


P.S TStringStream는 왜 한글이 깨질까요?

+ -

관련 글 리스트
14724 XE2에서 cPort4.11로 영수증프린트기 한글 출력문제 김영곤 2034 2013/07/13
14727     Re:XE2에서 cPort4.11로 영수증프린트기 한글 출력문제 gomsun2 2497 2013/07/18
14730         Re:Re:XE2에서 cPort4.11로 영수증프린트기 한글 출력문제 김영곤 2484 2013/07/23
14726     Re:XE2에서 cPort4.11로 영수증프린트기 한글 출력문제 civilian 2071 2013/07/18
14731         Re:Re:XE2에서 cPort4.11로 영수증프린트기 한글 출력문제 김영곤 2091 2013/07/23
14725     Re:XE2에서 cPort4.11로 영수증프린트기 한글 출력문제 바람 2057 2013/07/18
14729         Re:Re:XE2에서 cPort4.11로 영수증프린트기 한글 출력문제 망치 2596 2013/07/18
14732             Re:Re:Re:XE2에서 cPort4.11로 영수증프린트기 한글 출력문제 김영곤 2255 2013/07/23
Google
Copyright © 1999-2015, borlandforum.com. All right reserved.