Q&A
- Richedit에 대해서.. -4-
안녕 하세요..
Richedit에 대한 답변 이 없어서 예제를 하나 만들어서
다시 올립니다.
Richedit에서 입력받는 문자의 바이트 사이즈 제한에 대해서 질문을 드리고자
합니다. .
영문일 경우 .. KeyPress에서 바이트사이즈를 구해서 하니 되던데. .
한글일 경우는 제대로 되지가 않더군요..
그래서.. 예제 소스를 첨부합니다.
소스를 보시고, 답변 부탁드립니다.
주석에 막히는 부분에 대해서는 적었습니다.
그럼 좋은 하루 보내세요..
Richedit에 대한 답변 이 없어서 예제를 하나 만들어서
다시 올립니다.
Richedit에서 입력받는 문자의 바이트 사이즈 제한에 대해서 질문을 드리고자
합니다. .
영문일 경우 .. KeyPress에서 바이트사이즈를 구해서 하니 되던데. .
한글일 경우는 제대로 되지가 않더군요..
그래서.. 예제 소스를 첨부합니다.
소스를 보시고, 답변 부탁드립니다.
주석에 막히는 부분에 대해서는 적었습니다.
그럼 좋은 하루 보내세요..
2
COMMENTS
-
-
별 도움이 안되는 답변이지만...
저도 예전이 이런 문제에 봉착해서 고생을 했는데
결국 외부 컴포넌트(Raize)를 사용해서 피해간 기억이 어렴풋이 나네요!
(NOTICE) You must be logged in to comment on this post.
-
- 김우태
- 2005.06.29 22:14
- 0 COMMENTS
- /
- 0 LIKES
-
- 송인화
- •
- 2005.06.29 03:41
- •
- 2 COMMENTS
- /
- 0 LIKES
안녕 하세요.. Richedit에 대한 답변 이 없어서 예제를 하나 만들어서 다시 올립니다. Richedit에서 입력받는 문자의 바이트 사이즈 제한에 대해서 질문을 드리고자 합니다. . 영문일 경우 .. KeyPress에서 바이트사이즈를 구해서 하니 되...-
천희택•2005.07.02 08:20<!--CodeS--> procedure TForm1.RichEdit2KeyDown(Sender: TObject; var Key: Word; S...
-
무심코•2005.06.29 05:32별 도움이 안되는 답변이지만... 저도 예전이 이런 문제에 봉착해서 고생을 했는데 결국 외부 컴포넌트(R...
-
- 고영호
- •
- 2005.06.29 01:44
- 1 COMMENTS
- /
- 0 LIKES
-
실크맨•2005.06.30 23:37델파이 IDE의 메뉴중 Component -> Install Package 에서 "Borland Intergrated Translation Environme...
-
- 이현진
- •
- 2005.06.29 01:00
- 3 COMMENTS
- /
- 0 LIKES
-
모영철•2005.06.29 04:29제가 질문을 잘못 이해 한건지는 몰라도.. WndMethod1 := Panel1.WindowProc; Panel1.WindowProc := ...
-
이현진•2005.06.29 23:27저도 그러면 될줄 알았는데 그럴경우 panel2 없어져 버리네요. 후킹때문에 충돌이 나는것 같기도 한데.....
-
모영철•2005.06.30 01:54저는 아래 처럼 했는데요. 원하시는게 이것이 맞는지.. unit Unit1; interface uses ...
-
- 최지훈
- •
- 2005.06.29 00:41
- 2 COMMENTS
- /
- 0 LIKES
-
김병윤•2005.06.29 01:03<!--CodeS--> var li_CNT: Integer; begin li_CNT := 1; &n...
-
권태훈•2005.06.29 07:25if li_CNT IN[1..5] then 1에서 5까지 참 문자도 됩니다. 섞어 쓰기도됩니다. [1..5, 7.....
-
- 복숭아
- •
- 2005.06.28 22:20
- 1 COMMENTS
- /
- 0 LIKES
-
모영철•2005.06.29 04:387.0하고 5.0 거의 차이가 없을듯 싶은데요.. 5.0으로 되있는 소스를 7.0에서 컴파일하시려면 약간 수정...
-
- 이종민
- 2005.06.28 20:46
- 0 COMMENTS
- /
- 0 LIKES
-
- 장유경
- •
- 2005.06.28 19:41
- 4 COMMENTS
- /
- 0 LIKES
-
주웰•2005.06.29 00:00procedure TForm1.Button1Click(Sender: TObject); var FirstStr: string; Sec...
-
서영택•2005.06.28 20:05edit3.text:=IntToStr(StrToInt(edit1.text)+StrToInt(edit2.text));
-
장유경•2005.06.28 20:32제가 질문을 잘못한거 같네여... 그런답을 원한게 아니라 edit3 box에 edit1.text+edit2.text라고 쳤을...
-
서영택•2005.06.28 21:13소스가 무식하지만 답변이 맞는지 모르겠네요 procedure TForm1.Edit3KeyPress(Sender: TObject; var Ke...
-
- 서영택
- 2005.06.28 19:14
- 0 COMMENTS
- /
- 0 LIKES
-
- 박현식
- •
- 2005.06.28 02:59
- •
- 1 COMMENTS
- /
- 0 LIKES
-
이규하•2005.06.28 16:22Quickrep uninstall 하신다음에, %systemroot% 밑에 %system32% 에서 QRxxxx.bpl 을 삭제 하신다음에, 다시...
-
- 노승현
- •
- 2005.06.28 02:21
- 3 COMMENTS
- /
- 0 LIKES
-
모영철•2005.06.28 18:18어제 제컴에서 해보니 (XP sp2 인데요..) 게시자를 확인할수 없어서 ActiveX를 차단했다? 라고 나왓나 ...
-
노승현•2005.06.28 19:27우선 답변 달아주신데 감사드립니다. 그 경우엔..보안설정에서 안정하지 않은 파일 및 서명안된 파일인 경...
-
모영철•2005.06.28 22:19그럼 레지스트리를 확인해보는건 어떨까요.. 한번 다운 받았던 곳이라면 \..............아니겠지만.......
-
- 메니아
- •
- 2005.06.28 01:11
- 1 COMMENTS
- /
- 0 LIKES
-
모영철•2005.06.29 04:46그기능을 하려면 먼저 특정 문자만 색깔이 바뀌어야 할거 같네요.. 그리고 특정 위치에서 이벤트가 ...
-
- 조성윤
- •
- 2005.06.27 20:09
- 1 COMMENTS
- /
- 0 LIKES
-
정희돈•2005.06.27 22:29글쎄요 Access violation 에러의 경우 너무 많은 경우 발생한수 있어서 딱히 답을 드리기가 어렵습니다. ...
-
- 델팡
- •
- 2005.06.27 18:55
- 1 COMMENTS
- /
- 0 LIKES
-
홍성락•2005.06.28 00:20//hsr 검색해보시면 많아요 예로 "ListView에서 '열(col)'에 칼라를 주고싶어요" ListView의 속성 Ow...
-
- 양은기
- 2005.06.27 17:57
- 0 COMMENTS
- /
- 0 LIKES
-
- 송인화
- 2005.06.27 10:35
- 0 COMMENTS
- /
- 0 LIKES
-
- 송인화
- 2005.06.27 09:59
- •
- 0 COMMENTS
- /
- 0 LIKES
-
- 서기원
- •
- 2005.06.27 01:06
- 1 COMMENTS
- /
- 0 LIKES
-
nilriri™•2005.06.27 19:27var Limit : double; begin Limit := 2; Limit := Limit * 10...
-
-
김민식•2005.06.26 22:20모뎀 관련 코딩한지 십여년이 넘어서 기억이 가물가물 하네요.. 간단히 기억나는걸 요약하면.. 먼...
-
-
- 박기웅
- •
- 2005.06.26 00:03
- 1 COMMENTS
- /
- 0 LIKES
-
nilriri™•2005.06.27 18:29webbrowser나 javascript로 검색해 보세요.
procedure TForm1.RichEdit2KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
m_Rich2Length := Length(RichEdit2.Text);
Label3.Caption := Format( '%d', [ m_Rich2Length ] );
if m_Rich2Length > 9 then
RichEdit2.Text := Copy(RichEdit2.Text, 1, 10);
end;
<!--CodeE-->
원하시는게 이런게 맞는건지 잘 모르겠네요. m_Rich2Length 는 private에서 선언했습니다.