Q&A

  • image에서 희한한 일이 발생하였어요..
저는 아직 Delphi4를 쓰고 있읍니다.
그런데
이미지상에 Recangle로 사각을그리것과
          Line으로 그린 사각이 다르게 나타납니다...
델의 버그입니까?
아님 저가 잘못 코딩하였나요?
이미지,버턴을 각각 하나두고 테스트 해 보세요

그리고 지도 부탁드립니다......

procedure TForm1.Button1Click(Sender: TObject);
begin
with Image1 do begin
   Picture:= Nil;
   Canvas.brush.color := clBlack;
   Canvas.FloodFill(0,0,0,fsBorder);
   Canvas.Pen.Width:=1;

   //Recangle로 사각을 그린다....
   Canvas.Pen.Color:=clYellow;
   Canvas.Rectangle(20,20,200,200);

   //Line으로 사각을 그린다.....
   Canvas.Pen.Color:=clWhite;
   Canvas.MoveTo(20,20);
   Canvas.LineTo(200,20);
   Canvas.LineTo(200,200);
   Canvas.LineTo(20,200);
   Canvas.LineTo(20,20);
   end;
end;
1  COMMENTS