Delphi的绘图功能[9]

//第一种重载的声明:TextRect(  Rect: TRect;       {矩形}  X, Y: Integer;     

{相对于窗体的位置}  const Text: string {文本});{如果要输出的文本超出指定的矩形将

不被显示}------------------------------------------------------------------------------

--//第一种重载的举例:procedure TForm1.Button1Click(Sender: TObject);const  

R: TRect = (Left:0; Top:0; Right:60; Bottom:60);  s = '万一的 Delphi 博客';begin 

 Canvas.Brush.Color := clWhite;  Canvas.FillRect(R);  Canvas.TextRect(R, 10, 10, 

s);end;

//效果图:

以上是小编为您精心准备的的内容，在的博客、问答、公众号、人物、课程等栏目也有的相关内容，欢迎继续使用右上角搜索按钮进行搜索delphi
， canvas
， const
， 文本
， 矩形
TRect
delphi 绘图、delphi 绘图控件、delphi内存绘图源代码、delphi xe 绘图、delphi缓存绘图源代码，以便于您获取更多的相关知识。