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
[9800] Re:[질문] TImage 에 그림을 그리는데 화면이 너무 떨려요
유영인 Cuperido [cuperido] 1212 읽음    2004-08-13 02:46
델파이 4버젼 이상에선가부터 TImage 컴포넌트가 자동으로 Refresh가 되게 되었습니다.
그래서, OnPaint 메시지를 따로 처리를 안해줘도 되는데 반해, 계속 다시 그리기 때문에
깜빡 거림 현상이 나타납니다.

가장 쉬운 방법은 TPaintBox를 사용하는 것입니다. :)


cuperido

Milky Way 님이 쓰신 글 :
: 안녕하세요?
: 델파이 초보입니다.
:
: 이미지의 팔레트에 Mousemove 이벤트시 lineto 메소드로 그림을 그리도록
: 프로그래밍 했는데요, 화면떨림 현상이 너무 심해서 쓸 수 없을 정도입니다.
:
: 게시판에 다른분들이 쓰신 글을 보니
: 아래와 같이 하라고 되어 있더군요.
:
: DoubleBuffered := True;
:
: 그런데 이걸 추가해도 마찬가지 입니다.
:
: 어떻게 해야 이미지 깜빡임없이 선을 그릴 수 있을까요?
: 고수님들의 답변 기다리겠습니다.
:
: ------------------------------------------------------------------
: procedure TForm1.Image1MouseMove(Sender: TObject; Shift: TShiftState; X,
:   Y: Integer);
: begin
:   DoubleBuffered := True;
:   if Drawing = True then
:   begin
:       Bmp.Canvas.Pen.Width := StrtoInt(TxtLineWidth.Text);
:       with Bmp.Canvas do
:       begin
:         MoveTo(MovePt.X,MovePt.Y);
:         LineTo(X,Y);
:       end;
:       Image1.Picture.Assign(bmp);
:   end;
:   MovePt := Point(x,y);
:
: end;

+ -

관련 글 리스트
9795 [질문] TImage 에 그림을 그리는데 화면이 너무 떨려요 Milky Way 974 2004/08/10
9800     Re:[질문] TImage 에 그림을 그리는데 화면이 너무 떨려요 유영인 Cuperido 1212 2004/08/13
9801         Re:Re:[질문] TImage 에 그림을 그리는데 화면이 너무 떨려요 Milky Way 1233 2004/08/13
9802             Re:Re:Re:[질문] TImage 에 그림을 그리는데 화면이 너무 떨려요 civilian 2517 2004/08/13
9804                 Re: 제일먼저 해본방법이 그거거든요... Milky Way 1110 2004/08/13
9805                     Re:Re: 제일먼저 해본방법이 그거거든요... civilian 1121 2004/08/13
9807                         Re:Re:Re: 제일먼저 해본방법이 그거거든요... Milky Way 1149 2004/08/14
9808                             Re:Re:Re:Re: 제일먼저 해본방법이 그거거든요... 류종택 1792 2004/08/15
9811                                 [답변] 드디어 해결됬습니다. 감사드립니다. ^^ Milky Way 1315 2004/08/17
Google
Copyright © 1999-2015, borlandforum.com. All right reserved.