Delphi 绘图TCanvas[2] 无Canvas属性,获取 Canvas 对象

Delphi 绘图[2]  无Canvas属性,获取 Canvas 对象

1
2
3
4
5
6
7
8
9
10
//例如 Panel1 无TCanvas 属性,获取TCanvas
var
  Cvs: TCanvas;
begin
  Cvs:= TCanvas.Create;
  Cvs.Handle := GetDC(Panel1.Handle);
  Cvs.Brush.Color := clBlue;
  Cvs.FillRect(Panel1.ClientRect);
  Cvs.Free;
end;

 

创建时间:2020.02.01  更新时间:

posted on   滔Roy  阅读(395)  评论(0编辑  收藏  举报

编辑推荐:
· Linux系列:如何用heaptrack跟踪.NET程序的非托管内存泄露
· 开发者必知的日志记录最佳实践
· SQL Server 2025 AI相关能力初探
· Linux系列:如何用 C#调用 C方法造成内存泄露
· AI与.NET技术实操系列(二):开始使用ML.NET
阅读排行:
· 【自荐】一款简洁、开源的在线白板工具 Drawnix
· 没有Manus邀请码?试试免邀请码的MGX或者开源的OpenManus吧
· 园子的第一款AI主题卫衣上架——"HELLO! HOW CAN I ASSIST YOU TODAY
· 无需6万激活码!GitHub神秘组织3小时极速复刻Manus,手把手教你使用OpenManus搭建本
· C#/.NET/.NET Core优秀项目和框架2025年2月简报

导航

点击右上角即可分享
微信分享提示