如何得到控件属性列表,如何知道某个属性是否在属性列表中
如下代码为何永远为False
var I:Integer;
begin
for i:=0 to self.controlcount-1 do
begin
Listbox1.items.add(self.controls[i].name);
IF IsPropertyInCategory(TLocalizableCategory,self.controls [i].ClassType, 'Text') then
showmessage('true');
end;
如下代码为何永远为False
var I:Integer;
begin
for i:=0 to self.controlcount-1 do
begin
Listbox1.items.add(self.controls[i].name);
IF IsPropertyInCategory(TLocalizableCategory,self.controls [i].ClassType, 'Text') then
showmessage('true');
end;
if IsPublishedProp(Controls[i], 'Text') then
ShowMessage('True');
PropInfo:=GetPropInfo(AComponent.ClassInfo,APropertyName);
Result :=PropInfo<>nil;