如何在Delphi中使用TCanvas、TPen和TBrush类进行基本的绘图操作？请提供一个示例代码。

在Delphi中，利用TCanvas、TPen和TBrush类进行绘图是图形编程的基础。TCanvas类提供了绘制图形的画布，而TPen和TBrush分别用于设置线条和填充的样式和颜色。以下是一个示例代码，展示了如何使用这些类在窗体上绘制一个红色边框的矩形和填充蓝色的圆角矩形：

参考资源链接：[Delphi 绘图功能详解：Canvas、Pen 和 Brush 的使用](https://wenku.csdn.net/doc/3ogwstjmgv?spm=1055.2569.3001.10343)

procedure TForm1.FormPaint(Sender: TObject);
var
  CircleRect: TRect;
begin
  // 设置画笔样式为实线，颜色为红色，宽度为2像素
  Canvas.Pen.Style := psSolid;
  Canvas.Pen.Color := clRed;
  Canvas.Pen.Width := 2;
  
  // 绘制一个矩形边框
  Canvas.Rectangle(10, 10, 100, 100);
  
  // 设置画刷样式为实心填充，颜色为蓝色
  Canvas.Brush.Style := bsSolid;
  Canvas.Brush.Color := clBlue;
  
  // 设置圆角矩形的区域
  CircleRect := Bounds(120, 10, 100, 100);
  Canvas.RoundRect(CircleRect, 10, 10);
end;

在这个示例中，我们首先在窗体的FormPaint事件中编写代码，这样每次窗体重绘时都会执行绘图操作。接着，我们设置了TPen对象的属性来定义边框的样式、颜色和宽度，然后调用Canvas的Rectangle方法绘制一个矩形。之后，我们通过设置TBrush对象的属性来定义填充样式和颜色，并使用Canvas的RoundRect方法绘制一个圆角矩形。注意，圆角的大小可以通过最后一个参数来调整。

在掌握了基本的绘图操作后，你可以通过《Delphi 绘图功能详解：Canvas、Pen 和 Brush 的使用》来深入学习更多高级绘图技巧，包括不同图形的绘制方法、颜色模式、字体设置等，这本书将帮助你成为Delphi绘图领域的专家。

参考资源链接：[Delphi 绘图功能详解：Canvas、Pen 和 Brush 的使用](https://wenku.csdn.net/doc/3ogwstjmgv?spm=1055.2569.3001.10343)