자유롭게 질의 및 응답을 할 수 있는 게시판입니다. 개발자 여러분의 답변이 큰 도움이 됩니다.
- 제품설치/등록 오류 문의: 설치/등록 Q&A 이용 (제품 구매 고객 한정)
Delphi 문장안에 숨어있는 아스키값을 표시할순 없을까요?
2020.07.29 23:59
본 게시판은 개발자들이 자유롭게 질문과 답변을 공유하는 게시판입니다.
* 따라서 최대한 정중하게 질문을 올려 주세요.
* 질문을 상세히 작성해 주실 수록 좋은 답변이 올라 옵니다.
* 다른 분들도 참고할 수 있도록 결과 댓글 필수(또는 감사 댓글)
(결과 댓글을 달지 않는 경우 다음 질문에 대한 답변이 달리지 않는 불이익이 있을 수 있습니다.)
-----------------------------------------------------------------------------------------------
문장안에 숨어 있는 아스키값을 showmessage or edit.text or memo.text 에 나타낼순 없을까요
그림은 컴파일할때 브레이크포인트 찍고 나서 풍선메세지에 나타난 #$D#$A 이런 아스키코드를
직접보고 싶거든요 컴퓨터에 따라 가끔 한대씩에 같은 문장임에도 아스키값이 좀다르게 들어오는 경우가 있더라고요!
풍선메세지처럼 문장과 섞여있는 문장자체를 보고싶습니다.
고수님의 한수고견부탁드립니다. 감사합니다!
Delphi 문장안에 숨어있는 아스키값을 표시할순 없을까요?
2020.07.29 23:59
본 게시판은 개발자들이 자유롭게 질문과 답변을 공유하는 게시판입니다.
* 따라서 최대한 정중하게 질문을 올려 주세요.
* 질문을 상세히 작성해 주실 수록 좋은 답변이 올라 옵니다.
* 다른 분들도 참고할 수 있도록 결과 댓글 필수(또는 감사 댓글)
(결과 댓글을 달지 않는 경우 다음 질문에 대한 답변이 달리지 않는 불이익이 있을 수 있습니다.)
-----------------------------------------------------------------------------------------------
문장안에 숨어 있는 아스키값을 showmessage or edit.text or memo.text 에 나타낼순 없을까요
그림은 컴파일할때 브레이크포인트 찍고 나서 풍선메세지에 나타난 #$D#$A 이런 아스키코드를
직접보고 싶거든요 컴퓨터에 따라 가끔 한대씩에 같은 문장임에도 아스키값이 좀다르게 들어오는 경우가 있더라고요!
풍선메세지처럼 문장과 섞여있는 문장자체를 보고싶습니다.
고수님의 한수고견부탁드립니다. 감사합니다!
ASCII 코드 관련 함수들을 정리해 보았습니다.
//문자를 ASCII 코드(16진수)로 변환
var
t_str :string;
begin
t_str := char(13); //chr($D) 와 동일합니다.
Edit1.text := IntToHex(Ord(t_str[1]), 1);
end;
Edit1에는 D가 표시됩니다. Edit1.text := '$' + Edit1.text 이런식으로 표시할 수 있습니다.
//ASCII 코드(16진수)를 문자로 변환 : 아스키 숫자인 경우
var
sIn:String;
sWork:String;
begin
sIn := '37';
sWork := Char(StrToInt('$' + sIn));
end;
//아스키코드(문자)
System.Chr함수 : 숫자에 해당하는 아스키문자 리턴
Chr(X: Byte): Char
예) edit1.text := Chr(1);
//System.Ord 함수 : 문자에 해당하는 10진수 아스키코드 리턴 (Ord대신 Byte, Integer를 써도 된다)
Ord(C:Char): byte;
예) edit2.text := inttostr(Ord(edit1.text[1]));
//text가 스트링이므로
edit2.text := inttostr(Byte(edit1.text[1]));