Q&A

  • line은 그려지는데 arc 와 Pixels는 그려지지않습니다.[소스유]


Procedure boxdraw;
begin
form1.Canvas.Pen.Color := clRed;

with Form1.Canvas do
begin

Pen.Width := 2;
MoveTo( 5, 70 );
LineTo( 5, 377 );

MoveTo( 5, 377 );
LineTo( 377, 100 );

SetBkmode(Form1.canvas.handle, transparent);
Pen.Width := 2;
pen.color:= clRed;

MoveTo( 5, 70 );
Arc(5, 70, 10, 70, 5, 65, 10, 65);

MoveTo( 2, 70 );
Pixels[2, 10];
end;

end;
이 게시물을
1  COMMENTS
  • Profile
    최용일 • 2002.05.20 20:47
    안녕하세요. 최용일입니다.

    Arc(5, 70, 10, 70, 5, 65, 10, 65);

    호를 구축하는 타원의 세로 두깨가 0이네요... Arc(X1, Y1, X2, Y2, ...

    처음 네개의 파라매터를 조정해보세요...

    Pixels[2, 10];

    이건 별 의미없는 코드군요...

    (2, 10)의 위치에 점을 찍으실려면 아래와 같이 하세요...

    Pixels[2, 10] := clRed;

    ^^ 항상 즐코하세요...
←First Page
1013 1014 1015 1016 1017 1018 1019 1020 1021 1022
Last Page→
한델 로그인 하기