如何在一个容器中画我自己编写的控件?(100分)

  • 主题发起人 主题发起人 wn569
  • 开始时间 开始时间
W

wn569

Unregistered / Unconfirmed
GUEST, unregistred user!
我想编一个控件,然后在show的时候给它画一个特殊的形状在容器上。
 
说的详细一点。
是否只是画一个特殊的形状的控件,还是容器也做在控件里?
 
就是只划一个特殊的形状啊,谢谢了
 
那在TGraphicControl上继承,重载Paint过程就可以了。
例:
unit graphicControl1;

interface

uses
Windows, Messages, SysUtils, Classes, Controls;

type
TGraphicControl1 = class(TGraphicControl)
private
{ Private declarations }
protected
protected
procedure Paint; override;
public
constructor Create(AOwner: TComponent); override;
destructor Destroy; override;
published
{ Published declarations }
end;

procedure Register;

implementation

procedure Register;
begin
RegisterComponents('私人控件', [tgraphicControl1]);
end;

end.
 
能不能举一个具体的例子啊,我这人很笨,^_^谢谢了
 
这样嘛,留个地址,我把以前做的一个组件发给你。
 
好的,我的邮箱地址是:wn569@sohu.com
谢谢了。
 
已经发出了
 
后退
顶部