我想在Form的DFM文件中保存一些东西(设计时的屏幕分辨率),但是不起作用,查看DFM文件中并没有加入我在DefineProperties中定义的属性。procedure TMDFrm.DefineProperties(Filer: TFiler);
begin
inherited DefineProperties(Filer);
Filer.DefineProperty('DesignScreenWidth',ReadDesignScreenWidth,
WriteDesignScreenWidth, true);
Filer.DefineProperty('DesignScreenHeight',ReadDesignScreenHeight,
WriteDesignScreenHeight, true);
end;
难道在Form中不能设置DefineProperties?
begin
inherited DefineProperties(Filer);
Filer.DefineProperty('DesignScreenWidth',ReadDesignScreenWidth,
WriteDesignScreenWidth, true);
Filer.DefineProperty('DesignScreenHeight',ReadDesignScreenHeight,
WriteDesignScreenHeight, true);
end;
难道在Form中不能设置DefineProperties?
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货