답변 감사합니다.
덕분에 큰 도움 되었습니다!!
heidelloon 님이 쓰신 글 :
: mc킴 님이 쓰신 글 :
: : 안녕하세요.
: : TDBMemo내에 엔터키를 입력하지 못하도록 처리하고 싶습니다.
: : 아래와 같이 처리해봤습니다만, 에디트박스내에 엔터키는 그대로 적용이 되어 줄바꿈문자가 들어갑니다.
: : 다른 방법이 있을까요?
: : if (Key = VK_RETURN) then Key := #0;
:
:
: DBMemo같은 경우는 사용해 본 적이 없어서 잘 모르겠고
:
: 일반 TMemo에서 OnKeyPress를 아래와 같이 해주니 줄바꿈이 먹지 않네요.
:
: 참고하시면 될 듯 합니다..
:
: procedure TForm1.Memo1KeyPress(Sender: TObject; var Key: Char);
: begin
: if ( Key=Char( $0D ) ) OR ( Key=Char( $0D ) ) then
: begin
: Key := Char( $0 );
: end;
: end;
|