这样可以添加属性吗？ (50分)

我设计时创建了一个窗体，那可否另外给它添加一些属性如下：
type
TFrmOpenSave = class(TForm)
private
Ffilename: string;
　　procedure Setfilename(const Value: string);
published
procedure FilterComboChange(Sender: TObject);
property filename:string read Ffilename write Setfilename;
private
{ Private declarations }
public
{ Public declarations }
end;

这样作执行没问题，不知有没有问题

当然可以，没有问题的

挺标准的：）

多人接受答案了。