2013-02-23 2 views

답변

7

Delphi에는 Canvas 구성 요소가 없지만 응용 프로그램에서 사용자 지정 드로잉에 사용할 수있는 구성 요소를 찾고 있다면 TPaintBox 컨트롤을 찾고 있습니다 (이 구성 요소의 동일한 이름은 델파이에서도 사용됨). 나사로에서는 컴포넌트 팔레트에서 여기에서 찾을 수 있습니다 : 라자루스 IDE의 최신 버전에서는이 이름으로 구성 요소를 찾기 위해 구성 요소 선택에서 발전 할 수

enter image description here

. CTRL + ALT + P을 누르면 찾고자하는 컨트롤의 이름을 입력하면 바로 필터링되는 다음 창이 표시됩니다. 당신이 (이름을 일치 하나 이상이 있다면) 구성 요소를 선택하고 Enter 키를 누릅니다되면, 구성 요소는 팔레트에서 선택 :

enter image description here

당신은 다음 OnPaint 이벤트에 대한 이벤트 처리기 방법을 쓸 것 당신의 TPaintBox 구성 요소의와 것은 당신의 드로잉을 할 구성 요소의이 Canvas :

procedure TForm1.PaintBox1Paint(Sender: TObject); 
begin 
    PaintBox1.Canvas.Brush.Color := clGreen; 
    PaintBox1.Canvas.FillRect(PaintBox1.ClientRect); 
end; 
0

캔버스 이미 폼 응용 프로그램에 정의 된 대부분의 경우입니다. 간단히 "캔버스"를 입력하고 점을 찍어 기능을 확인하십시오. 이것은 Lazarus와 Delphi의 모든 버전에서 작동합니다.

procedure TForm1.FormShow(Sender: TObject);
begin
  canvas.TextOut(10,10,'Hello World');
end;

관련 문제