能否在tabsheet里面加入canvas属性？

Question

我想在tabsheet上直接划线，而不是在tabsheet上的某个控件上画，但是又发现tabsheet的属性里面没有canvas属性，怎样实现呢？能否在tabsheet里面加入canvas属性？怎样加？ 谢谢！

Answer 1

用的是PageControl1: TPageControl;在pagecontrol上创建的new page（tabsheet)需要在tabsheet上划线，但又不想再在tabsheet上放空件

Answer 2

你定义一个TCanvas。代码如下
var
  FCanvas: TCanvas;FCanvas := TCanvas.Create;
FCanvas.Handle := GetDc(tabSheet1.Handle);这个FCanvas就是tabsheet1的canvas属性，你中意在上面画什么都行。