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는 왜 한글이 깨질까요?