delphi 控件开发 请问在控件开发中如何声明上图中options下面的如dgEditing属性? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 属性声明为集合,包含为True,不包含为False type TOptions = (dgEdit, dgTitle, dbTabs...); TOptionsSet = set of TOptions; TYourCloass = Class ... published property Options: TOptionsSet; ... end; type TOption = (dgEditing, dgTitles, dgIndicator); TOptions = set of TOption; TObj = class private FOptions: TOptions; procedure SetOptions(const Value: TOptions); published property Options: TOptions read FOptions write SetOptions default [dgEditing, dgTitles, dgIndicator]; end;procedure TObj.SetOptions(const Value: TOptions);begin FOptions := Value;end; 请问楼上的朋友,这样声名后,控件里三项都是“True“和”False”,假如dgEditing, dgTitles, dgIndicator这几个属性有的要定义逻辑值、有的要定义数值,即用户输入数值,如何分别定义? 朋友,你的问题,实际上是关于Delphi比较深入的一个主题--组件编写,其涉及的内容比较多和深入,一般的delphi开发不会涉及到这些知识,帮助文档中也有专门的介绍,在这帖子内一问一答是完不了事的。我觉得,你还是先把问题结了吧。 inno setup 制作安装包 怎么修改bat文件? 为啥总是提示Jpeg error #42 自定义组件如何定义快捷键? 来看看这个问题。分不够在加 delphi的反编译情况 这回有人回答了吧??? 初用指针 100分求解!!!! 急!谁能帮我做帮助?100分相送!!! 关于DBGrid的问题.. FastReport汉化问题 delphi中richeview的TRVOfficeConverter使用,保存word出错???
TOptions = (dgEdit, dgTitle, dbTabs...);
TOptionsSet = set of TOptions; TYourCloass = Class
...
published
property Options: TOptionsSet;
...
end;
TOption = (dgEditing, dgTitles, dgIndicator);
TOptions = set of TOption;
TObj = class
private
FOptions: TOptions;
procedure SetOptions(const Value: TOptions);
published
property Options: TOptions read FOptions write SetOptions default [dgEditing, dgTitles, dgIndicator];
end;procedure TObj.SetOptions(const Value: TOptions);
begin
FOptions := Value;
end;
朋友,你的问题,实际上是关于Delphi比较深入的一个主题--组件编写,其涉及的内容比较多和深入,一般的delphi开发不会涉及到这些知识,帮助文档中也有专门的介绍,在这帖子内一问一答是完不了事的。我觉得,你还是先把问题结了吧。