Como verificar se uma classe possui a propriedade informada como published?
Em alguns casos avançados, surge a necessidade de verificar se uma
propriedade é vísiblie Object Inspector, para tanto, ele deve ser
informada como published.
Agora veja como verificar se uma classe possui a propriedade
informada como published.
Antes a unit TypInfo deve estar declarada na seção uses,
em versões unicode declare System.TypInfo.
Utilize a função IsPublishedProp.
{ Informe a classe e a propriedade. }
Função do Delphi: IsPublishedProp( Classe, Propriedade );
Retorno: Boolean.
Abaixo, segue um exemplo de uso:
1
2
3
4
5
6
| procedure TForm1.Button1Click(Sender: TObject);
begin
if (IsPublishedProp(TEdit, 'Color')) then
ShowMessage('TEdit possui a propriedade Color visível no '+
'Object Inspector.');
end; |
procedure TForm1.Button1Click(Sender: TObject);
begin
if (IsPublishedProp(TEdit, 'Color')) then
ShowMessage('TEdit possui a propriedade Color visível no '+
'Object Inspector.');
end;
É uma dica interessante e que pode ser útil para a automatização de tarefas.
Dúvidas ou sugestões deixe nos comentários do post.
-
InfusTec
-
2.646 views
- 0 comentários
- 23 de março de 2015
Está gostando do conteúdo? Considere pagar um cafezinho para nossa equipe!
Posts Relacionados - Continue Aprendendo