我想在 Lazarus 中创建一个绘图应用程序,但我没有看到合适的控件,我可以在 Deplhi 中将其用作画布。它叫什么名字 ?
问问题
749 次
2 回答
7
Delphi中没有Canvas
组件,但如果您正在寻找可以在应用程序中用于自定义绘图的组件,那么您正在寻找TPaintBox
控件(在 Delphi 中也使用该组件的相同名称)。在 Lazarus 中,您可以在组件面板中找到它:
在较新版本的 Lazarus IDE 中,您可以从组件选择器中前进以按名称查找组件。如果您按CTRL+ ALT+ P,您将看到以下窗口,您只需在其中键入您要查找的控件的名称,它就会立即被过滤掉。一旦您选择了组件(如果有多个与名称匹配的组件)并按ENTER,则该组件在调色板中被选中:
然后,您将为组件的OnPaint
事件编写事件处理程序方法,TPaintBox
并在那里对组件进行绘图Canvas
:
procedure TForm1.PaintBox1Paint(Sender: TObject);
begin
PaintBox1.Canvas.Brush.Color := clGreen;
PaintBox1.Canvas.FillRect(PaintBox1.ClientRect);
end;
于 2013-02-25T00:24:09.583 回答
0
大多数情况下,Canvas 已在 Forms-Applications 中定义。因此,只需输入“画布”后跟一个点即可查看功能。这适用于所有版本的 Lazarus 和 Delphi。
procedure TForm1.FormShow(Sender: TObject);
begin
canvas.TextOut(10,10,'Hello World');
end;
于 2013-03-05T08:47:43.987 回答