A apache Unregistered / Unconfirmed GUEST, unregistred user! 2001-07-02 #1 我想做个控件让他的iocn属性像这个样子做出来? 由例子吗?
M menxin Unregistered / Unconfirmed GUEST, unregistred user! 2001-07-02 #2 自己做一个可以呀,一个TIMAGE,一个DIALOG,几个BUTTON。不行吗?
W wind_cloudy Unregistered / Unconfirmed GUEST, unregistred user! 2001-07-02 #3 将你的icon属性声明为Tbitmap即可.如 property icon:Tbitmap read geticon write seticon;
A apache Unregistered / Unconfirmed GUEST, unregistred user! 2001-07-02 #4 我想知道的是怎么写到dfm中去 还有那个对话框是怎么出来的
W wind_cloudy Unregistered / Unconfirmed GUEST, unregistred user! 2001-07-06 #5 该对话框是delphi对于图象类型已经注册的属性编辑器。 在delphi的/source/property editors下的picedit.pas即是其原代码.
H huizhang Unregistered / Unconfirmed GUEST, unregistred user! 2001-07-22 #6 写入Form这段你可以省却了, 只要声明属性为TIcon, Delphi就会自动写入DFM文件, 实际上 TBitmap, TIcom等等都是写成TStream 具体参见: TPicture.DefineProperties
写入Form这段你可以省却了, 只要声明属性为TIcon, Delphi就会自动写入DFM文件, 实际上 TBitmap, TIcom等等都是写成TStream 具体参见: TPicture.DefineProperties
星 星际浪人 Unregistered / Unconfirmed GUEST, unregistred user! 2001-08-11 #7 这就是定义了一个 TPicture 的 PropertyEditor 了。
L LeonSu Unregistered / Unconfirmed GUEST, unregistred user! 2001-10-22 #8 定义一个TBitmap属性的值, 在控件创建时创建这个属性, 修改时,把相应的Value拿给这个属性OK了。如下: ... FBmp: TBitmap procedure SetB(Value: TBitmap); ... property Bmp: Tbitmap read FBmp write SetB; ... procedure ...Create... ... FBmp:=TBitmap.create; ... procedure ...Destroy; ... FBmp.Free; ... procedure ...setB(Value: TBitmap); begin FBmp:=Value; end;
定义一个TBitmap属性的值, 在控件创建时创建这个属性, 修改时,把相应的Value拿给这个属性OK了。如下: ... FBmp: TBitmap procedure SetB(Value: TBitmap); ... property Bmp: Tbitmap read FBmp write SetB; ... procedure ...Create... ... FBmp:=TBitmap.create; ... procedure ...Destroy; ... FBmp.Free; ... procedure ...setB(Value: TBitmap); begin FBmp:=Value; end;