Paint问题!不难(120分)

  • 主题发起人 主题发起人 新黛飞
  • 开始时间 开始时间

新黛飞

Unregistered / Unconfirmed
GUEST, unregistred user!
我在label的画布上画线条,但当有窗体等从label上移过时,画布中的图像就被擦掉了。
我也观察了一些label类的控件,在这些控件的源码中都有
procedure Paint;override;

procedure TLabel.Paint;...

请问我怎么做才能防止label的画布被擦掉,也就是为Tlabel加入一个paint

 
TPaintLabel = class(TLabel)
protected
procedure Paint;override;
end;
 
后退
顶部